in reply to Re^2: Help for generating multiple file from singl e file and parsing it.
in thread Help for generating multiple file from singl e file and parsing it.

what you describe would be a symptom of say a blank line at the end of the DATA section although I'm not sure how you get to line 8968! The code should skip blank lines and this shouldn't matter.

I just ran the code here again. Download and run it verbatim.

  • Comment on Re^3: Help for generating multiple file from singl e file and parsing it.

Replies are listed 'Best First'.
Regeler expression->Re^4: Help for generating multiple file from singl e file and
by sarf13 (Beadle) on Oct 17, 2011 at 17:48 UTC
    Hi Marshall thank you very much for help me out. now it working perfectly.
    i have one more issue can you please guide me for writing a reguler expression for substitution.
    i have this pattern :- 3023NMANS.20111011.2 as a value of hash where starting no (3023) and last no (.20111011.2) will be change and NMANS wil be constant.i need to write reguler expression for substituting this pattern with nothing.
    i really appreciate for your help.
      Still not sure what you want. To separate the numbers back out, perhaps:
      #!/usr/bin/perl -w use strict; my $str ='3023NMANS.20111011.2'; my ($front,$end) = $str =~ /^(\d+)NMANS([.\d]+)/; print "$front $end\n"; #3023 .20111011.2
      if you are using 3023NMANS.20111011.2 as a hash key, then you want to delete it to remove it and its associated value from the hash.