Help for this page

Select Code to Download

Select or download this

sub push (\@;@) {
    my $array = shift;
    CORE::push ( @$array, @_ ? @_ : $_ )
}