11 May 2011

nak dpt'n url respone gune perl


#!/usr/bin/perl

use LWP::Simple;

my $url = 'http://www.ibtimes.com/articles/143863/20110511/google-inc-android-ice-cream-sandwich-motorola-mobility-samsung-lg-smartphone-tablet-gingerbread-hon.htm';

my $content = get $url;
die "Couldn't get $url" unless defined $content;

# klu url success
print "success..wuwuwuu";

0 comments: