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?

In relation to Perl object oriented programming, which option is the maximal option that provides multiple features, has a big ecosystem, and a thriving user base?

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?

How many scalars will the array @num have after the following command: my @days = qw (Sunday Monday Tuesday Wednesday Thursday Friday Saturday); my @num = (1..scalar @days);