perlgolf hole - Error Message

Hole type: one-liner

Write a Perl one-liner that prints the following to STDERR:
Can't find label TPC at -e line 5.

Solutions

Code	Length
`perl -e"die qq{Can't find label TPC at -e line 5.\n}"`	53
`perl -e '' -e '' -e '' -e '' -e'goto TPC'`	41
`perl -e0 -e, -e, -e';' -e'goto TPC'`	35
`perl -e{ -e{ -e} -e} -e'goto TPC'`	33
`perl -e'#line 5' -e'goto TPC'`	29
`perl -e'#line 5' -egoto+TPC`	27

Comments

This hole was really just to see if people know about the somewhat obscure #line direction. It was used as a practice hole at the tournament.

We decided to disallow the following clever solution, because it's not strictly a one-liner. This solution works because sh allows quotes to span multiple lines.

perl -e"



goto TPC"