my $source_file = defined($options{o}) ? $options{o} : 'as.xcf-dist';

##</code><code>##

my $source_file = 'as.xcf-dist';
$source_file = $options{o} if defined($options{o});

##</code><code>##

my $source_file = $options{o};
$source_file = 'as.xcf-dist' if !defined($options{o});

##</code><code>##

sub defined_or { defined($_[0]) ? $_[0] : $_[1] }
my $source_file = defined_or( $options{o}, 'as.xcf-dist' );

##</code><code>##

# Requires 5.10
my $source_file = $options{o} // 'as.xcf-dist';