Joel wrote:
> I fixed the source code with the suggestions given, but still no
> luck. Any other ideas?
> 
> Joel
> -------------------------------------------
> #!usr/bin/perl
> 
> $abc=1000
> 
> until ($abc==0)
> {
> print "Counting down to 0 from $a\n";
> $a--;
> }
> print "Blast off!";
This does it, but has been changed around a little:

use strict;

my $abc=1000;

do {
print "Counting down to 0 from $abc\n";
$abc--;
 }until ($abc==0);
 
print "Blast off!";


        Also should use strict and warnings.

      Any questions and/or problems, please let me know.

      Thanks.

Wags ;)
Int: 9-8-002-2224
Ext: 408-323-4225x2224



**********************************************************
This message contains information that is confidential
and proprietary to FedEx Freight or its affiliates.
It is intended only for the recipient named and for
the express purpose(s) described therein.
Any other use is prohibited.
****************************************************************


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


Reply via email to