#!/usr/bin/perl $z = int(rand(1000)+1); $y = 'reverse ' x $z; eval eval qq{$y "@{['\"n\\\\.rekcaH','lreP','rehtonA','tsuJ\"','tnirp' +]}"} [download]
In reply to My first JAPH by mr_mischief