C:\test>type junk1.pl | perl junk1.pl
?#! perl -slw
?
?use strict;
?
?print "?$_?" for <>;
?