develooper Front page | perl.perl5.porters | Postings from January 2003

Re: [perl #20536] use if 1, open => ':utf8' fails

Thread Previous
Benjamin Goldberg
January 27, 2003 11:52
Re: [perl #20536] use if 1, open => ':utf8' fails
Message ID:
Autrijus Tang (via RT) wrote:
> +  $f =~ s!::!/!g;
> +  eval "require '$'" or die;       # Adds .pm etc if needed

I'm not sure how important a change it would be, but you might want to
change that from:
   eval "require '$'" or die;
   require "$" or die;
Since, afaiks, there's no need for the eval EXPR there anymore.

$..='(?{print+substr"\n !,$^C,1 if $^C<26})(?!)';
$.=~s'!'haktrsreltanPJ,r  coeueh"';BEGIN{${"\cH"}
|=(1<<21)}""=~$.;qw(Just another Perl hacker,\n);

Thread Previous Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About