Is it cheating to use the shell?
#!/usr/bin/perl exec"cat $0"
If you're ok with letting the output happen on STDERR instead of STDOUT:
#!/usr/bin/perl die`cat $0`
...which shaves off one keystroke.
Dave
In reply to Re: print source golf
by davido
in thread print source golf
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |