Regarding unless in Perl

[Mallik]

Dear Friends,

I have the following code

unless(-d $dir)
{
   unless(mkdir $dir)
   {
        print "Error\n";
   }
}

Can I rewrite the above code in the following way

unless (-d $dir | mkdir $dir)
{
   print "Error\n";
}

Thanks in advance,

Mallik.

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>