|
Тема
|
kak da pravia redirectvane v Perl
|
|
Автор | Perlio (Нерегистриран) |
Публикувано | 01.09.06 19:30 |
|
molia za pomosht
iskam da napravia slednoto - posetitelia na moiata stranica klika na link koito vodi kum Perl script - scripta spored uslovie zadadeno ot men go preprashta avtomati4no ili na yahoo.com ili na google.com primerno - mnogo me interesuva kak da stane tova avtomati4no preprashtane
i oshte neshto - iskam informaciata za refferer page da se zapazva - toest yahoo.com da vijdat 4e posetitelia idva ot moia sait
zashtoto kogato izpolzvam html i tozi meta tag
<meta http-equiv="refresh" content="0;url=http://www.yahoo.com">
refferer page se gubi i te ne vijdat 4e idva ot men surfera
molia pomognete
| |
Тема
|
Re: kak da pravia redirectvane v Perl
[re: Perlio]
|
|
Автор | Jud (Нерегистриран) |
Публикувано | 02.09.06 20:30 |
|
The easy-to-remember way:
#!/usr/bin/perl -w
use strict;
use CGI qw/:standard/;
print redirect('http://www.redantigua.com');
More efficient, not loading the CGI module:
#!/usr/bin/perl -w
use strict;
print 'Status: 302 Moved', "\r\n", 'Location: http://www.redantigua.com', "\r\n\r\n";
| |
|
|
|
|