Well, there's always good ol' csplit from the command line.
--
Greg Raven
Apple Valley, CA
Illegal immigration is a weapon of mass destruction.
On Sep 24, 2007, at 8:26 AM, Michael Havlicek wrote:
Hello,
This morning I tried to write
a perl script for your problem.
For the moment I wrote the following code.
#!/usr/bin/perl
use warnings;
undef $/;
our $y = 0;
our $number = 1;
our $file = "/Users/michel/Desktop/dominique.txt";
our $result = "/Users/michel/Desktop/myresult";
open (GH, "< $file") or die "cant'open file:$!";
while (our $pet = (<GH>)) {
while ($pet =~ m/./smg) {
$count++;
}
our $lenght = 4096;
for (my $i =1; $i <= int($count/$lenght); $i++) {
our $rep = substr($pet,$y,$lenght);
open (HG, "> $result.$number.txt") or die "cant'create file:$!";
select (HG);
print $rep;
$number += 1;
$y += 4096;
close (HG) or die "can't write:$!";
}
}
close (GH) or die "can't read:$!";
_END_
This script works but there are still 2 problems.
First this script doesn't go to the last newline.
Second the last remainder of the 4096 character chunk
is not printed supposing he is less than 4096 characters.
Also be careful you initial file must be bigger than
4096 character.
I don't have so much time today but perhaps a Perl
scripter here could correct my code.
Best regards,
--
Michael Havlicek
Le Sep 22, 2007, à 7:42 PM, Marconi a écrit :
I have an alphabetical list (21K and growing) with 1200 lines in
it. I thought I'd carry it on my iPod in the Notes directory so I
could consult it while away from home (instead of buying a PDA to
carry the info).
I put the file into the Notes directory on iPod but found, when I
went to read it, that it was truncated in the middle of a line
somewhere in the Cs. It would appear that iPod notes are limited
to maybe 4096 characters max.
I'd like to have a script which would break the front BBEdit
document up into smaller than 4096 bytes each files: mylist1.txt,
mylist2.txt ... mylist[n].txt.
When run, the script would count 4096 characters into the file,
then back up far enough to encounter a line break, then forward
one character to include the line break as the last character of
the selection. That way, no entry would be broken over two lines.
Write the file as [filename]1.
From that point, repeat the process, counting 4096 characters from
the last point written to a file and go back to the last line
break. Lather, rinse, repeat until the text file has been broken
into a series of files small enough to be read by iPod's Notes
function.
It would be nicer still if the parts were named mylist_A-B.txt,
mylist_C-... with some hint in the file name as to which entries,
alphabetically, were contained therein. Since it's an alphabetical
listing, the first character on each line tells us where we are.
Can anyone offer advice on how to do this?
Anyone already done something similar?
AppleScript or Perl or...? What's the best tool for something like
this?
--
---------------------------------------------------------------------
---
Have a feature request? Not sure the software's working correctly?
If so, please send mail to <[EMAIL PROTECTED]>, not to the list.
List FAQ: <http://www.barebones.com/support/lists/
bbedit_script.shtml>
List archives: <http://www.listsearch.com/bbeditscripting.lasso>
To unsubscribe, send mail to: <[EMAIL PROTECTED]>
--
----------------------------------------------------------------------
--
Have a feature request? Not sure the software's working correctly?
If so, please send mail to <[EMAIL PROTECTED]>, not to the list.
List FAQ: <http://www.barebones.com/support/lists/bbedit_script.shtml>
List archives: <http://www.listsearch.com/bbeditscripting.lasso>
To unsubscribe, send mail to: <[EMAIL PROTECTED]>
--
------------------------------------------------------------------------
Have a feature request? Not sure the software's working correctly?
If so, please send mail to <[EMAIL PROTECTED]>, not to the list.
List FAQ: <http://www.barebones.com/support/lists/bbedit_script.shtml>
List archives: <http://www.listsearch.com/bbeditscripting.lasso>
To unsubscribe, send mail to: <[EMAIL PROTECTED]>
