Select Code to Download

lib.pl
-------------
...
  }

1;

-----------------
prog.pl
...
$lib::common{username}="unixhelp";

$lib::common{username}=lib::untaint_username($lib::common{username});