# Doggie.pm package Doggie; 1; sub new { # ignore args print "hello from Doggie::new\n"; }