Help for this page

Select Code to Download


  1. or download this
        use LWP::UserAgent;
        use HTTP::Request::Common qw(GET);
    
    ...
        } else {
            print $res->status_line . "\n";
        }
    
  2. or download this
    CREATE TABLE IF NOT EXISTS `ReadingGrabCache` (
      `grab_id` int(11) NOT NULL AUTO_INCREMENT,
      `url` varchar(255) CHARACTER SET latin1 NOT NULL,
    ...
      `all_images` longtext CHARACTER SET latin1,
      PRIMARY KEY (`grab_id`)
    ) ENGINE=MyISAM  DEFAULT CHARSET=utf8 COLLATE=utf8_bin AUTO_INCREMENT=
    +141 ;