my $class = shift; $class = ref $class || $class;