#!/usr/bin/perl

while(<>) {
    print;
}