sub foo
    {
    my @args = @_;
    unless (scalar @args)
        {
        warn "No args in foo!";
        return;
        }
    return join ':', @args;
    }