[Perl] $var moet beginnen met http

[Koffie]

Pff ...ik heb me wezenloos gezocht op GoT/Inet maar kan het nergens vinden.
Ik krijg dus een variable binnen, en wil checken of het een 'url' is.
Als ik al iets vind dan gaan ze compleet checken via Socks of het bestaat enzo.
Het enie wat ik eigenlijk wil weten, is of de inhoud van eenvariable begint met

code:

http://

Wat er verder allemaal achter staat boeit me eigenlijk helemaal niets.

[Annie]

m'n perl is nogal behoorlijk roestig
maar kan dat niet ongeveer zo:

code:

if ($varretje =~ /^http:\/\//i) {
  # ja
} else {
  # nee
}

[Mark]

brak maar werkend

if (substr($jouwvar,0,6)

[Koffie]

iig niet te roetsig, want hij werkt wel thx daarvoor.
Had eigenlijk stiekum nog een vraagje, maar weet niet hoe dat bij Wasigh/PW gaat
Als het de bedoeling is dat we hier nieuwe topics openen, let me know.. doen we dat gewoon.

Wat dus het 'probleem' is, ik heb een .HTML pagina, deze is ingedeeld in frames.
Het hoofdframe roept een Perl script aan.
Als ik dan de referrer opraag, krijg ik uiteraard de als referrer die HTML pagina, en niet de gene die die pagina opvraagt.
Eni idee hoe ik dat kan afvangen ??

[tomato]

Annie: maar kan dat niet ongeveer zo:
[..]

Nee, dat kan precies zo

Al zou ik er voor de leesbaarheid dit van maken:

code:

!^http://!i

[D2k]

Op dinsdag 22 januari 2002 13:11 schreef Koffie het volgende:
Eni idee hoe ik dat kan afvangen ??

<lelijk>
referrer stiekum meegeven als var naar je perl-frame??
</lelijk>

[D2k]

<compleet ot>
er staat een typo in je faq

Zowieso worden repy getrashed waar alleen maar in staat Bestruingssyteem X zuigt, neem Y!!

</ot>

[Koffie]

hehe .. zal meteen ff m'n FAQ aanpassen
He meegeven van die refer had ik ook al aangedacht, echter het enie wat ik me dan kan bedenken is met JS de referrer opvragen en deze zo doorsturen -> perscript.pl?ref=ref_uit_JS

Echter volgens mij pakt JS alleen referrer als zijnde vanaf welke LINK je komt, en Perl pakt toch gewoon je vandaan komt, en anders je eigen domein???
Kzal er nog's ff mee prutsen.
_{en vervolgens snapt iedereen wat ik in elkaar aan het brouwen ben}

[D2k]

Op dinsdag 22 januari 2002 13:19 schreef Koffie het volgende:
hehe .. zal meteen ff m'n FAQ aanpassen

gek dat iemand die er nooit komt daar de faq leest he?
ik ben gek geloof ik

He meegeven van die refer had ik ook al aangedacht, echter het enie wat ik me dan kan bedenken is met JS de referrer opvragen en deze zo doorsturen -> perscript.pl?ref=ref_uit_JS

geen id
ik kan geen perl
ik kan alleen maar dingen noemen die mogelijk zouden kunnen werken
syntactisch mag je het zelf uitzoeken

Echter volgens mij pakt JS alleen referrer als zijnde vanaf welke LINK je komt, en Perl pakt toch gewoon je vandaan komt, en anders je eigen domein???
Kzal er nog's ff mee prutsen.
_{en vervolgens snapt iedereen wat ik in elkaar aan het brouwen ben}

nee vertel eens??

[tomato]

Inderdaad, zoals D2K zegt lijkt me vrijwel de enige oplossing.

Dus met javascript iets klussen als dit:

code:

document.write ('<frame src=koffie.html?ref="' + ref + '>);

[Annie]

Op dinsdag 22 januari 2002 13:16 schreef D2k het volgende:
<compleet ot>
er staat een typo in je faq
</ot>

1-tje maar?
* Annie ziet er nog 2 in de quote

* Annie blaast het stof van z'n perl-boek en legt het terug in de kast (toch niet nodig)

[Koffie]

hah .. * Koffie maakt sowieso *altijd* typo's
Ben aan 't testen met JS , maar snap geen hout van dat JS

Hmmz.. as said JS geeft dus idd alleen een referrer als 'ie vanaf een directe link komt.
Vraag nog wel f bij de buren in WG
ThX for helping iedereen!

[D2k]

Op dinsdag 22 januari 2002 13:37 schreef Annie het volgende:

[..]

1-tje maar?
* Annie ziet er nog 2 in de quote

voor 5 goelde ikke hele faq nalezen op typo's

* Annie blaast het stof van z'n perl-boek en legt het terug in de kast (toch niet nodig)