my $arg0 = shift || 'foo';
my $arg1 = shift || 'bar';
my $arg2 = shift || 'baz';