while (<>) {
    chomp;
    push @array, $_;
}