Select Code to Download

open( my $fh, ">", $output ) or die_with_error();

my $value = $some_other_value || undef;

my $filename = $some_filename || default_filename();

my $filename = $some_filename ? $some_filename : default_filename();

# original
my $filename = prompt_for_filename() || default_filename();
...
my $prompted_filename = prompt_for_filename();
my $filename = $prompted_filename ? $prompted_filename 
                                  : default_filename();