package xyz;

use strict;
use warnings;

require 5.008;
require Exporter;

our @ISA = qw(Exporter);
our @EXPORT = qw(	@array
			);
my $file = "qwerty.txt";
open FILE, "< $file";
my @array = <FILE>;