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