On 2009-10-18 at 5:53 PM, [email protected] (Bruce Van Allen) wrote:

>On 2009-10-18 at 5:35 PM, [email protected] (Jonathan Lundell) wrote:
>
>>Bruce, how are you handling the % fortune separator?
>
>Not sure what you are referring to.

OK, my bad for responding to something in between running my own 
work jobs. I looked at the fortune file, so now I see the '%'.

Before the start of the read loop, add the line

$/ = "%\n";

while (<$in>) {
     next if /\%/;

I know, you hate that, too...  :-)

Also, take of the "\n" at the end of each output line

>print $out $sort_buckets{$_}, "\n";

Just say:

   print $out $sort_buckets{$_};


    - Bruce

_bruce__van_allen__santa_cruz_ca_


--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the 
"BBEdit Talk" discussion group on Google Groups.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/bbedit?hl=en
If you have a feature request or would like to report a problem, 
please email "[email protected]" rather than posting to the group.
-~----------~----~----~----~------~----~------~--~---

Reply via email to