Help for this page
$line = <IN>;
@lines = <IN>;
open IN, "file"; print <IN>;
use File::Slurp; print read_file("file");