<?xml version="1.0" encoding="windows-1252"?>
<node id="684508" title="Re^4: Wanted: humanly readable `script` output" created="2008-05-04 22:02:56" updated="2008-05-04 18:02:56">
<type id="11">
note</type>
<author id="961">
Anonymous Monk</author>
<data>
<field name="doctext">
&lt;p&gt;This problem with the way /g works is fixed with the 1 while hack
&lt;code&gt;
[james@adajio ~]$ cat test.pl
#!/usr/bin/perl

my $text = "No \x08\x08\x08 good";
1 while $text =~ s/.\x08//;
print "$text\n";

[james@adajio ~]$ ./test.pl
 good
[james@adajio ~]$

&lt;/code&gt;</field>
<field name="root_node">
684459</field>
<field name="parent_node">
684507</field>
<field name="reputation">
20</field>
</data>
</node>
