use my_module;

print "@my_var\n"; # prints 1..10
change_var();
print "@my_var\n"; # prints 20..30
{ # using local to supress @ARGV
    local @ARGV = ($arg1, $arg2...); # $arg1, $arg2... are the arguments to be passed
    
    do "2.pl";
}
exit;