my $myscale = 1;
if ( defined $scale ) { $myscale = $scale; }