On Tue, Oct 21, 2003 at 01:06:44PM -0700, Jeff Westman wrote:
> Steve Grazzini <[EMAIL PROTECTED]> wrote:
> > On Tue, Oct 21, 2003 at 12:17:17PM -0700, Jeff Westman wrote:
> > > # ... but can I do something like....
> > > print "first\n" unless ($counter) else { print "second\n";
> > 
> > Not really.  You could use the conditional operator, though.
> > 
> >   print $counter ? "second\n" : "first\n";
> 
> True, but I was looking for a way to do this with a somewhat "buried"
> unless keyword.

  print +( qw(second first --> unless <--) )[ not $counter ];

-- 
Steve

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to