Created by www.tryperl.com.

Untitled.pl

#Created by tryperl.com
use strict;
use warnings;

print "Hello, cocksuckers.";
print "I am highly offended, dickhead.";
if omglolidontknowperl
    print "\r\n\r\nHoly Jeeberz Jeebus, one is one!\r\n\r\n"
    print " GO AWAY, BATLOVER ";