From owner-freebsd-questions@FreeBSD.ORG  Sun Apr  4 15:28:00 2010
Return-Path: <owner-freebsd-questions@FreeBSD.ORG>
Delivered-To: freebsd-questions@FreeBSD.org
Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:4f8:fff6::34])
	by hub.freebsd.org (Postfix) with ESMTP id B8AF11065670
	for <freebsd-questions@FreeBSD.org>;
	Sun,  4 Apr 2010 15:28:00 +0000 (UTC)
	(envelope-from merlyn@stonehenge.com)
Received: from red.stonehenge.com (red.stonehenge.com [208.79.95.2])
	by mx1.freebsd.org (Postfix) with ESMTP id 9D9E68FC0A
	for <freebsd-questions@FreeBSD.org>;
	Sun,  4 Apr 2010 15:28:00 +0000 (UTC)
Received: by red.stonehenge.com (Postfix, from userid 1001)
	id F03F55E71; Sun,  4 Apr 2010 08:27:59 -0700 (PDT)
From: merlyn@stonehenge.com (Randal L. Schwartz)
To: kline@thought.org
References: <20100403210610.GA4135@thought.org> <4BB8108A.9080104@FreeBSD.org>
	<1270371713.5861.98.camel@tao.thought.org>
	<86aatjnsts.fsf@red.stonehenge.com>
x-mayan-date: Long count = 12.19.17.4.8; tzolkin = 13 Lamat; haab = 1 Pop
Date: Sun, 04 Apr 2010 08:27:59 -0700
In-Reply-To: <86aatjnsts.fsf@red.stonehenge.com> (Randal L. Schwartz's message
	of "Sun, 04 Apr 2010 08:25:03 -0700")
Message-ID: <861vevnsow.fsf@red.stonehenge.com>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1 (berkeley-unix)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Cc: glarkin@FreeBSD.org, FreeBSD Mailing List <freebsd-questions@FreeBSD.org>
Subject: Re: perl qstn...
X-BeenThere: freebsd-questions@freebsd.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: User questions <freebsd-questions.freebsd.org>
List-Unsubscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-questions>, 
	<mailto:freebsd-questions-request@freebsd.org?subject=unsubscribe>
List-Archive: <http://lists.freebsd.org/pipermail/freebsd-questions>
List-Post: <mailto:freebsd-questions@freebsd.org>
List-Help: <mailto:freebsd-questions-request@freebsd.org?subject=help>
List-Subscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-questions>, 
	<mailto:freebsd-questions-request@freebsd.org?subject=subscribe>
X-List-Received-Date: Sun, 04 Apr 2010 15:28:00 -0000

>>>>> "Randal" == Randal L Schwartz <merlyn@stonehenge.com> writes:

Randal> Even simpler:

Randal>     if (@ARGV) {
Randal>       print "No args\n";
Randal>     } else {
Randal>       print "arg is $ARGV[0]\n";
Randal>     }

Augh.  I hit send just as I realized that's backwards.  Need
more caffiene.  Swap the true and false blocks there. :)

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion