#!/usr/bin/perl -w print 'test\n'; print "test\n"; __END__ test\ntest