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]