no strict 'refs'; : strict « Language Basics « Perl






no strict 'refs';

    



use strict 'refs';

$variable = 100;

{
    no strict 'refs';

    $variablename = "variable";

    print $$variablename;
}

   
    
    
    
  








Related examples in the same category

1.use strict 'refs';
2.use strict 'subs';
3.use strict 'vars';
4.use strict Pragma
5.use strict;
6.'use strict' and subroutine
7.'use strict' with package
8.The strict Pragma
9.Using the strict Pragma