Instantly share code, notes, and snippets.

Embed
What would you like to do?
print pQuery->get($url)->title;
#!/usr/bin/perl
use strict;
use warnings;
# install pQuery:
# sudo cpanm pQuery;
use pQuery;
my $url = "https://github.com/sodonnell/plowbot/";
print "URL: ". $url ."\nTitle: ";
print pQuery->get($url)->title ."\n";
# much easier than using LWP+regexp.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment