in reply to Autovivification in perl

It makes it possible to write
    push @{ $at_line{$string} }, $line_number;

[download]

instead of 

    $at_line{$string} = [] unless exists $at_line{$string};
    push @{ $at_line{$string} }, $line_number;

[download]
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Replies are listed 'Best First'.
Re^2: Autovivification in perl
by ikegami (Patriarch) on Jan 10, 2014 at 20:27 UTC
    Well, 
    push @{ $at_line{$string} //= [] }, $line_number;

    [download]
    or even 
    push @{ $at_line{$string} ||= [] }, $line_number;

    [download]
    would do.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom