>660
open(IN, $inputfile);
$fsize = (-s IN);
read(IN, $intext, $fsize);
close(IN);
print $intext;