my $string = " "; $string = "Default" if $string =~ /^ *$/;