print = $line; #### print $line; #### use strict;