sub default
{
        foreach (@_)
        {
                $_ = '' unless (defined($_));
        }
}