Select Code to Download

use 5.026;
use warnings;
...
    print Data::Dumper->Dumpxs( [ \ @arr ], [ qw{ *arr } ] );
    say q{-} x 30;
}

/abc/def/ghi
@arr = (
...
         'somefile'
       );
------------------------------