What will be the output of the following Perl code snippet?

@EXAMPLE = ("   - ABC",

          "01 - FAS",

              "2  - FAP",

          "   - STTR");

foreach (@EXAMPLe){

    if (/0/ .. /1/) {

        print "$_\n";

    }

}

What will be the output of the following Perl program? if ('5678' =~ /(?5)(?6)(?7)(?8)/) {foreach my $b_name (sort keys %-) { my $array_n = $-{$b_name}; foreach my $i (0..$#$array_n) { print '\$-{$b_name}[$i] : ', (defined($array_n->[$i]) ? ' '$array_n->[$i]' ' : 'undef'), '\n'; } } }

Which Perl debugger commands is used for deleting all post-prompt Perl command actions?

What are you doing?

While using Perl, which commands can be used for determining the number of items in a hash?

In relation to the Perl regular expression, which modifier is used for performing case- insensitive pattern matching?

$m=ucfirst('test'); What will be the output of $m?

Does perl require variables be declared with a type? (ie: int, float, double, etc.)

How would you output the list of keys in a hash?

What is the shebang?

What does the 'shift' function do?