Select Code to Download

package accounts;
use strict;
...
}
1;

use strict;
use warnings;
...
my $newdata = results($file);

print Dumper $newdata;

a
b
c
d
e

$VAR1 = [
          'a',
...
          'd',
          'e'
        ];