Help for this page
package Scripts; sub do_something {} 1;
use Scripts; my @ARRAY = <DATA>; Scripts::do_something( \@ARRAY );