redo statement : Redo « Statement « Perl

Home
Perl
1.Array
2.CGI
3.Class
4.Data Type
5.Database
6.File
7.GUI
8.Hash
9.Language Basics
10.Network
11.Regular Expression
12.Report
13.Statement
14.String
15.Subroutine
16.System Functions
17.Win32
18.XML
Perl » Statement » Redo 




redo statement



#!/usr/bin/perl -w

use strict;

my $number = 10;

while (<STDIN>) {
    chomp;
    print "You entered: $_\n";
    if ($_ == $number) {
        $_++;
         redo;
    }
    print "Going to read the next number now...\n";
}

 














Related examples in the same category
1.Using the redo statement in a while structure.
2.While loop, foreach loop, and block and redo
3.A word-counting program that uses the redo statement.
4.Using a label without a loop and the redo statement
java2s.com  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.