Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: HTML::Clean

by merlyn (Sage)
on Oct 15, 2001 at 22:07 UTC ( #118956=note: print w/replies, xml ) Need Help??


in reply to HTML::Clean Review

You might consider an inplace edit instead:
#!/usr/bin/perl $^I = ".bak"; $/ = undef; while (<>) { print STDOUT "$ARGV is being cleaned!\n"; my $h = HTML::Clean->new($_, 9); $h->compat; $h->strip; print ${$h->data}; }
Now you get backups with ".bak" automatically. Good if something messes up.

-- Randal L. Schwartz, Perl hacker

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://118956]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (4)
As of 2019-10-19 12:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?