sub new {
    my $cname = shift; 
    my $class = ref($cname) || $cname;