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