Select Code to Download

$ perl -le '           
    my $password = "abc$def";
    print $password;
'
abc

$ perl -le '
    use warnings;
...
Name "main::def" used only once: possible typo at -e line 3.
Use of uninitialized value $def in concatenation (.) or string at -e l
+ine 3.
abc

$ perl -le '
    use strict;
...
'
Global symbol "$def" requires explicit package name at -e line 4.
Execution of -e aborted due to compilation errors.

use strict;
use warnings;