| |
|
|
| | Здравствуйте. Подскажите пожалуйста, как реализовать такой php-код на перле
$google=file_get_contents("http://www.google.com/webmasters/sitemaps/ping?sitemap=".trim($map)."sitemap.xml");
Заранее благодарен. | |
| |
|
|
| |
|
|
| |
для: semenaua
(21.04.2008 в 12:27)
| | |
#!/usr/bin/perl
use CGI::Carp qw(fatalsToBrowser);
use LWP::Simple;
#не знаю откуда берется $map, но вот тут он должен взяться:)
#если с клавиатуры, то так: $map = <>; chomp $map;
$map =~ s/(^\s*|\s*$)//;
my $url = 'http://www.google.com/webmasters/sitemaps/ping?sitemap='.$map.'sitemap.xml';
my $google = get($url);
|
Не отлаживал, но как-то так. | |
| |
|
|
