my $file = "qwerty.txt";
open FILE, "< $file";
our @array = <FILE>;