Re: Bash-style Parameter expansion in Perl?

var="hello world"            my $var = "hello world";
var2=${var/world/earth}      ( my $var2 = $var ) =~ s/world/earth/;
echo $var2                   say $var2;
[download]

I believe 5.14 will also allow

my $var2 = $var =~ s/world/earth/f;
[download]

Comment on Re: Bash-style Parameter expansion in Perl? Select or Download Code

Replies are listed 'Best First'.
Re^2: Bash-style Parameter expansion in Perl? by JavaFan (Canon) on Jul 08, 2010 at 07:21 UTC
The new modifier is written `/r`.	[reply] [d/l]
Re^2: Bash-style Parameter expansion in Perl? (or) by tye (Sage) on Jul 08, 2010 at 08:27 UTC
It is nice to localize the temporary. Sometimes it is also nice to not name the temporary. In the following, the small trick is... `my $var= "hello, world"; for( @{[ $var ]} ) { # Make a copy s/world/earth/; say; # hello, earth } say $var; # hello, world` [download] ...making $_ not be an alias to $var so $var doesn't get modified. Perl 6 gives one explicit control over such (iterate over read-only aliases, read/write aliases, or read/write copies). Perl 5 requires less explicitly targeted techniques. There are other alternatives to `@{[ ... ]}`, of course. I don't like the implicit scope that makes this work: `use strict; my $var= "Hello, World!"; for( my $copy= $var ) { s/World/Earth/; print $_, $/; } print $var, $/; eval 'print $copy, $/; 1' or print '$copy no longer in scope', $/; __END__ Hello, Earth! Hello, World! $copy no longer in scope` [download] but the implicit scope block is there and the above technique may be clearer (less idiomatic). - tye	[reply] [d/l] [select]
Re^2: Bash-style Parameter expansion in Perl? by bubnoff (Novice) on Jul 08, 2010 at 18:51 UTC
Thanks ~ This is what I was looking for. Bubnoff	[reply]