open FILE, "sample.txt" or die $!;
my @lines = <file1>;