Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: Select data between a START and END pattern

by Thelonius (Priest)
on May 01, 2003 at 20:51 UTC ( #254808=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    @a = 1 .. 7;
    
  2. or download this
    while (something) {
      if (EXPRSTART .. EXPREND) {
         doit();
       }
    }
    
  3. or download this
    $inmatch = 0;
    while (something) {
    ...
        $inmatch = 0;
      }
    }
    
  4. or download this
    while (something) {
      if (EXPRSTART ... EXPREND) {
         doit();
       }
    }
    
  5. or download this
    $inmatch = 0;
    while (something) {
    ...
        $inmatch = 0;
      }
    }
    
  6. or download this
    while (<>) { print if /A/ .. /B/ }
    
  7. or download this
    while (<>) { print if /A/ ... /B/ }
    
  8. or download this
    Here's some text before
    Some text with an A
    ...
    more useless lines 1
    more useless lines 2
    more useless lines 3
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://254808]
help
Chatterbox?
[choroba]: As discussed in Using the DATA file handle for ARGV, I usually start my "fun" scripts with *ARGV = *DATA{IO} unless @ARGV;
[choroba]: this was just a remainder
[Discipulus]: ah thanks i forgot that thread (even if i saved it in my homenode)..

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (8)
As of 2016-12-06 08:42 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (101 votes). Check out past polls.