What will be the output of the following Perl program?

use Scalar::Util 'blessed';

  my $var1 = {};

  my $var2 = $var1;

  bless $var1, 'Class';

  print blessed( $var2 ) // 'happy blessed';

  $var2 = "Something else"; print blessed( $var2 ) // 'not happy blessed'; '>

In relation to perltie, a class implementing tied scalar should define which method? i) TIESCALAR ii) FETCH iii) STORE

What will be the output of the Perl code? $_ = 'Mark is to the left of red window.'; if ( /\b(red)\s+(\w+)/i ) { print '$2 follows $1.\n'; }

Which option is less secure than the other, and should not be used for authentication?

Which statement is/are correct about the command paragraph of perlpod? i) The '=item' command should be used outside of the '=over'... '=back' region. ii) An '=item' should be the first thing after an '=over' command unless there are not going to be any items at all. iii) The '=headn' command cannot be put inside an '=over'... '=back' region.

In relation to identifier parsing in Perl, which of the following options is invalid?

To disable a database error, what parameter is set in the database initialization?

Which is not used for assigning a value to a variable?

$_ is used by default:

To execute blocks of code depending on whether a condition is met, you use:

Which would declare a global variable?