It's a DOS-style file, with "\r" on every line, and there is a blank first line before the shebang line. You can run it with `perl ./bugs.pl` or do `perl -i.bak -pe's/\r//' bugs.pl` and remove the first blank line then run with `./bugs.pl`.

(cool obfu, though :)