Perl :while 和 until 的用法 @ 拉不拉多的夢幻世界

Feb 06 Wed 2008 01:04
Perl :while 和 until 的用法

until 用在限制條件為假時,都執行程式看下面範例 :範例是印出1到10
無限制條件寫在( )中
#!/bin/perl
my $i=1;
until ($i >10 )
{
    print "$i\n";
    $i=$i+1;
}
until 用在限制條件為真時,都執行程式看下面範例 :範例是印出1到10
#!/bin/perl
my $i=1;
while ($i <10 )
{
    print "$i\n";
    $i=$i+1;
}