Help for this page
my $arg1 = shift;
local @ARGV = @_;
use Getopt::Long; ... do_awesome_things -v => -file => 'foo.txt', -file => 'bar.txt';