How can I make this do what I mean?
#!/usr/bin/perl use warnings; use strict; my $var = 'world'; undef $/; my $data = <DATA>; print $data; #oops __DATA__ hello $var -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>