Visning af en "remote"-side

Nu sad jeg lige og læste det igennem, det kan vist misforståes - det er IKKE et redirectionsscript jeg har brug for, men selve scriptet skal printe "fjern-siden".
Så man skal selv kunne tilføje tekst efter "fjern-siden"...
Håber I forstår ......

Lige éen ting til :-)
Scriptet behøver ikke være i PERL, men kan også være i ASP ...

Mener du et script der henter en remote site, og viser den, så du fx. kan vise Jubii, bare med din URL??

Nemmerli'!

#!Sti_til_perl

use LWP::Simple;
#Her hentes http://www.jubii.dk/
$content = get("http://www.jubii.dk/";)

print "content-type: text/html\n\n";
print "$content";

#Ps. Tjek lige med den side du henter om du har lov, da de ellers kan blive
#ret sure ;-)

Hmm - den skriver blot:
Can't locate LWP/Simple.pm in @INC at d:\www2\jdsoft\PowerLook.pl line 3.
BEGIN failed--compilation aborted at d:\www2\jdsoft\PowerLook.pl line 3.
--
Kan du ikke noget lignende i ASP?

Enten er din Perl ikke konfiguret rigtigt, eller også er det en ældre udgave. Hvis det er en ældre udgave, kan den nyeste hentes fra www.perl.org, graits.

Prøvede du det lokalt, eller på din server? Det kan være den er lidt mere up-to-date mht. LWP.

Jeg kender ikke til ASP - det må du hen i ASP gruppen efter...

Jeg kørte scriptet fra fjernserveren, og jeg har ikke mulighed for at opdatere den eftersom jeg ikke har de fulde rettigheder til serveren - men ellers tak for forsøget..........

Kan du ikke bare kalde en frame som indeholder den side du vil vise?

Altså en side med en frame på 100 % der så indeholder siden www.opasia.dk/index.htm

Tsk tsk tsk - I forstår det vist ikke, men heldigvis fandt jeg selv ud af det...
Det er et GENIALT script!!

ADMIN VIL DE VÆRE VENLIG AT LUKKE DETTE SPØRGSMÅL, DA JEG IKKE FIK NOGEN KVALIFICERET HJÆLP?!

Så bør du poste scriptet/løsningen så andre kan få glæde af det også.

Næ, næ - det tog skam tid at lave det, så det giver jeg ikke bare sådan ud!!!!

OK; min fejl, jeg troede formålet med dette forum var at udveksle viden, ikke at holde på den.

Ja, men ikke viden der har kostet mig adskillige arbejdstimer!!

du kan jo også bare omdirrigere siden ved at skrive print "location: http://www.skodpasia.dk\n\n"; istedet for alt det der content-type halløjsa...

Det er godt du!

Her skulle det være....

$_ giver indholdet af siden

##########

#!/usr/bin/perl
use strict;
$| = 1;
my $VERSION = "1.0";

use LWP::UserAgent;
use URI::Escape;

my $query = uri_escape(shift);

my $QBASE = "http://www.opasia.dk/index.html";

my $ua = new LWP::UserAgent;
$ua->agent("browser/$VERSION");
$ua->env_proxy;


$_ = &fetch("$QBASE");
print $_;

 
sub fetch {
my $url = shift;

my $request = new HTTP::Request('GET',$url);
my $response = $ua->request($request);
die "$url failed: ",$response->error_as_HTML
unless $response->is_success;

$response->content;
}

-