John St. John's blog: learning perl and feeling nerdy

Monday, November 5, 2007

learning perl and feeling nerdy

#!/usr/bin/perl

print(("a","c","e","h","j","k","l","n","o","p","r","s","t","u"," ") [4,13,11,12,14,0,7,8,12,3,2,10,14,9,2,10,6,14,3,0,1,5,2,10]);

#thats how I roll...

1 comment:

John St. John said...: #!/usr/bin/perl

print(("a","c","e","h","j"..."l","n"..."p","r"..."u"," ") [4,13,11,12,14,0,7,8,12,3,2,10,14,9,2,10,6,14,3,0,1,5,2,10]);

#this one is even cooler...; November 5, 2007 at 8:03 PM