No need to involve a browser at all. Here's one way, using the excellent HTML::TokeParser::Simple by the monastery's own Ovid.

#!/usr/bin/perl
use warnings;
use strict;
use LWP::Simple;
use HTML::TokeParser::Simple;
my $page=get('http://www.page.you.want.com/some/path');

my $p = HTML::TokeParser::Simple->new( \$page );
while ( my $token = $p->get_token ) {
    # This prints all text in an HTML doc (i.e., it strips the HTML)
    next unless $token->is_text;
    print $token->as_is;
}
[download]

Stuffing it into a file is left as an exercise for the poster.

I can't just strip the HTML, if I could I know how to do that myself. There is JavaScript in the code that prints something out and I need to retrieve what this is.

I can't retrieve the source code becuse it's just the JS code there, not the data it prints. So I need a way to make a perl screen scraper to scrape text from a page without introducing HTML codes to any degree.

Javascript has been a problem for page scraping. People have tried to go around it by, say, recording the actual http parameters, which is not relevant to your problem. The other approach is to drive IE using Win32::OLE. I used Win32::IE::Mechanize before, but it's mainly for navigation/parsing, you/someone needs to figure out how to call the "Save As" method from COM.

I didn't know "Save As Text" will evaluate javascript printing. I tried it out, apparently it works.

Updated. just saw the module Win32::CaptureIE, it looks more promising.

Sorry, I was a bit confused by the question. I do very little on or for windows, so hopefully someone more experienced with automating the evil empire will speak up.

-Any sufficiently advanced technology is
indistinguishable from doubletalk.

My Biz

If you're asking how to script the actions of opening IE and clicking the file menu and so on.... Maybe look into Win32::OLE or the ActiveState Win32 mailing lists.
--
jpg

use strict;
use warnings FATAL => 'all';

use Win32::IE::Mechanize;

my $ie = Win32::IE::Mechanize->new(visible => 1);

$ie->get('http://www.perlmonks.com/');
$ie->follow_link(text => 'Seekers of Perl Wisdom');
$ie->follow_link(text => 'save a page as text');

print $ie->content;
[download]