Re: [PERL] Html stripping

["Ricco Jensen" <sslug@sslug>]

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
>