use my_module;

print "@my_var\n"; # prints 1..10
change_var();
print "@my_var\n"; # prints 20..30
system("perl 2.pl"); # calling another script
exit;