Re^2: Optional parameter before reference (!proto)

[Neutron Jack]

Oh, that's excellent! I'd forgotten that @_'s elements are aliases for the actual scalar parameters. We get the referencing for free, without the caller having to use a backslash.

This does what I need:

sub verify {
        my $ref = \pop;
        my $string = @_ ? shift : "<default>";
        $$ref = $string;    # Dummy action for testing
}

verify $a;
verify "hello", $b;

print "a=$a b=$b\n";        # Expect a=<default> b=hello

[tye]

Interesting. I specifically didn't use \pop because I figured that you'd end up with a reference to a copy. But it makes sense that it is the assignment in "my $x = pop" that does the copying and not the pop. Thanks.