sub defaults { my $self = shift; my $default1 = shift // 1; my $default2 = shift // 2; my $default3 = shift // 3; print("$default1 $default2 $default3\n"); }