my $c=Cop->new;
our $bullshit = $c->bark;