open(file1, "sample.txt") or die("ack - $!"); #### print(); #### seek(file1, 0, 0); #### print scalar();