Select Code to Download

    if( A
    and B
...
    ) {
        # ...
    }

    my @array = (
        $one,
        $two,
        $three,
    );

__END__
$_=q,just perl,,s, , another ,,s,$, hacker,,print;