I just make shell to Perl conversion, where shell starting Perl. And this was existing on UNIX Perl scripts. Now I make them work as CGI on apache. That is why I am looking to convert them. $short_desk was declared and created in the other Perl script , which is using sub from package get_pin.