Mercurial > repo
view bin/hello @ 8832:8a48f37112f0
<wob_jonas> `` e=bin/hello;>$e echo $\'#!/usr/bin/perl\\n\'\'$c=unpack"h",pack"h",$ARGV[0]",($c&4?"w":"W"),"orld",($c&8?"."),"\\n";\' &&chmod -c a+x $e
author | HackBot |
---|---|
date | Sun, 24 Jul 2016 11:04:58 +0000 |
parents | |
children | 5ea8d821d0dc |
line wrap: on
line source
#!/usr/bin/perl $c=unpack"h",pack"h",$ARGV[0]",($c&4?"w":"W"),"orld",($c&8?"."),"\n";