YAPC::2004::Israel | << Previous | Index | Next >> | Copyright © 2004 Gaal Yahas |
But wait! What if we already had $_ defined?
while (<>) { if (my ($trusted) = /trusted_users = (.*)/x) { foreach (split /,/, $trusted) { $current_user->register_trust($_); } } # some more handling: what happens to $_? }
local $_; foreach $_ (split /,/ $trusted) { # ... |