Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 242
  • Last Modified:

Split a long string into smaller string

I am reading fields from a large file and I end up with a variable holding a string of an unfixed length (1->50000 bytes). I need a perl script that will take this long string and if it is longer than 4,000 bytes, split it into an array of strings of 4,000 bytes or less.
0
mikedgibson
Asked:
mikedgibson
  • 2
1 Solution
 
FishMongerCommented:
0
 
mikedgibsonAuthor Commented:
I accomplished it with

my $length = length($note);
if ($length >= 4000) {
      $numnotes = ($length-($length%4000))/4000;      
      for ($i = 0; $i <= $numnotes; $i++) {      
        print "Note Part ".($i+1).":".substr($note,$i2*4000,4000)."\"\n";
      }

Maybe not the best way to do it but it works.
0
 
mikedgibsonAuthor Commented:
I found a way to accomplish this myself.
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now