Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
use warnings;
...
( defined $count ) ?
    ( print "=" until ( $count ++ == 10 ) ) :
    ( print "Undefined count.\n" );
  2. or download this
    ( defined $count ) ?
    ( until ( $count ++ == 10 ) { print "=" } ) :
    ( print "Undefined count.\n" );
  3. or download this
    if ( defined $count ) {
    print "=" until ( $count ++ == 10 );
}
else {
    print "Undefined count.\n";
}