Fixed Perl reverse shell payload

Found out why it was not working, replaced %s with $host and $port as applicable and it works fine in my test env (both VM on local network and on a remote host).

More to come...