Select Code to Download

#!/usr/bin/perl -w

...
# Now reset all variables who name starts with 'v'
reset('v');
print "Var value =$var, Van value =$van\n";