#!/usr/bin/perl $line = ; chomp($line); print $line;