Re^6: How can I avoid code repetition here

Replies are listed 'Best First'.
Re^7: How can I avoid code repetition here by JavaFan (Canon) on Oct 08, 2009 at 15:07 UTC
All what's happening is an implicite passing of $_. But passing $_ isn't any different from passing $str. And you do believe that `my $str = "..."; chop $str` modifies the lexical (I guess you meant lexical variable where you write localized variable) variable, don't you?	[reply] [d/l]
Re^8: How can I avoid code repetition here by rovf (Priest) on Oct 09, 2009 at 07:37 UTC
you do believe that my $str = "..."; chop $str modifies the lexical Yes, with explicit passing of a lexical, it is easy to understand how it is done; and if the compiler "knows" about `chop` (as a 'builtin' function), I can understand now how this work for this case. I wonder whether it would also be possible to write a user defined sub which, when called without parameters, acts on `$_` even if it was lexically declared. I don't see how this can be done... -- Ronald Fischer <ynnor@mm.st>	[reply] [d/l] [select]
Re^9: How can I avoid code repetition here by JavaFan (Canon) on Oct 09, 2009 at 08:36 UTC
`sub hello (_) {say "Hello, ", @_ ? $_[0] : $_} hello "world"; my $_ = "mars"; hello; { my $_ = "earth"; hello; } hello; __END__ Hello, world Hello, mars Hello, earth Hello, mars` [download]	[reply] [d/l]
Re^10: How can I avoid code repetition here by rovf (Priest) on Oct 12, 2009 at 09:43 UTC
Re^11: How can I avoid code repetition here by JavaFan (Canon) on Oct 12, 2009 at 11:03 UTC
Some notes below your chosen depth have not been shown here
Re^9: How can I avoid code repetition here by Anonymous Monk on Oct 09, 2009 at 08:21 UTC
What do you mean? `$_ = 1; my $_ = 6; sub ford { $_ .= 6; }; warn $_; warn ford(); warn $_; warn $::_; __END__ 6 at - line 4. 66 at - line 5. 66 at - line 6. 1 at - line 7.` [download]	[reply] [d/l]