Re: [PERL] Html stripping

[Jonas B.Nielsen <sslug@sslug>]

hmmm eller

% perl -pi -e 's/\r//g;' <filnavn>

det plejer at virke for mig, det kan også sniges ind i programmet, hvis 
man har lyst til det, selv om det så vli blive en dos-html2unix-txt.pl

jonasbn

On Wednesday, January 29, 2003, at 03:46 , Ricco Jensen wrote:

> Hvad med at bruge dos2unix /unix2dos
>
> MVH Ricco
>
> "Poul-Erik Andreasen" <sslug@sslug> skrev i en meddelelse
> news:sslug@sslug
> > On Wed, 29 Jan 2003 06:33:58 +0100
> > Poul-Erik Andreasen <sslug@sslug> wrote:
> >
> > > Hej
> > >
> > > Jeg bruger f¯lgende til strippe en html tekst:
> > >
> > >
> > > #!/usr/bin/perl -w
> > > use strict;
> > > undef $/;
> > > open(INPUT,$ARGV[0]) or die;
> > > open(OUTPUT,"+> $ARGV[1]") or die;
> > > my $a=<INPUT>;
> > > close (INPUT);
> > >
> > > $a=~ s/<.*?>//gs;
> > > print OUTPUT $a;
> > > close OUTPUT;
> > > exit;
> > > Af en eller anden grund bliver der efter ladt en del " <cr>"
> > > Jeg kan ikke rigtig gennemskue hvorfor.
> >
> > Jeg har fundet ud af det, der er bare fordi at det er en dos fil
> > jeg stripper fra og \r bliver udskrevet  som " <cr>" i min editor.
> >
> >
> >
> > --
> > Poul-Erik Andreasen