use constant SCALE_DEFAULTS => qw(-width 10  -length 200  -etc 42);

my $s = $MW->Scale(SCALE_DEFAULTS, -override => 1, etc...);