my $password = mkpasswd(); if ( $password =~ m/\"|\'/ ) { $password = mkpasswd(); }