On Sun, Jun 12, 2016 at 05:00:59AM -0500, Christopher Stone wrote:
> This Perl filter will probably do the job for you and is fairly easy to
> understand.
>
> #!/usr/bin/env perl -sw
>
> my $cntr = 1;
>
> while (<>) {
> if ( m!(^.*<document id="KyChr-DB-B-)(\d{3})(">.*)! ) {
> print "$1".sprintf("%03d", $cntr++)."$3\n";
Alternatively, if you want to increment the existing value, rather than
using a new counter, replace
$cntr++
with
$2 + 1
> } else {
> print;
> }
> }
Ronald
--
This is the BBEdit Talk public discussion group. If you have a
feature request or would like to report a problem, please email
"supp...@barebones.com" rather than posting to the group.
Follow @bbedit on Twitter: <http://www.twitter.com/bbedit>
---
You received this message because you are subscribed to the Google Groups
"BBEdit Talk" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to bbedit+unsubscr...@googlegroups.com.
To post to this group, send email to bbedit@googlegroups.com.
