Re^2: RFC: Idiom for named read-write arguments (aliases) instead of using $_[0] etc

[LanX]

in reply to Re: RFC: Idiom for named read-write arguments (aliases) instead of using $_[0] etc
in thread RFC: Idiom for named read-write arguments (aliases) instead of using $_[0] etc

well using parts of it doesn't make it an idiom or pattern.

can't see any \( ) in juerd's code and the other examples look like obfuscation contest for me not like an advice for an idiom.

[BrowserUk]

Looking again, I see you are right. Whilst related, they are not the same usage.

By way of penance:

sub swap{ 
    our($a,$b); 
    local( *a, *b ) = \( @_ ); 
    ($a, $b ) = ( $b, $a ) 
}

my( $x, $y ) = ( 1, 'fred' ); 
swap( $x, $y ); 
print "$x, $y";;
fred, 1

print swap( 1, 'fred' );;
fred 1

[LanX]

good point, since $a and $b are magical globals you can even avoid the our-decalaration (in this case)

[BrowserUk]

Didn't think of that, but I have to wonder if $a & $b are really that much better than $_[0] & $_[1] ?

Okay for swap(), I guess.