marto@Marto-Desktop:~/code$ perl print.pl 
wpeofkwpoefmarto@Marto-Desktop:~/code$ chmod +x print.pl 
marto@Marto-Desktop:~/code$ ln -s print.pl test
marto@Marto-Desktop:~/code$ ./test 
wpeofkwpoefmarto@Marto-Desktop:~/code$ cd /usr/local/bin/
marto@Marto-Desktop:/usr/local/bin$ sudo ln -s $HOME/code/print.pl derp
marto@Marto-Desktop:/usr/local/bin$ derp
wpeofkwpoefmarto@Marto-Desktop:/usr/local/bin$ ./derp 
wpeofkwpoefmarto@Marto-Desktop:/usr/local/bin$ 

##</code><code>##

#!/usr/bin/perl

print "wpeofkwpoef" or die "Can't print to stdout: $!";

##</code><code>##

derp &>derplog