sub new { my $class = shift; # Pass the command line to the base class. my $self = $class->SUPER::new(@_); # Set OS specific defaults. $self->{'binDir'} = 'bin/solaris'; bless ($self, $class); return $self; }