Skip to content

Instantly share code, notes, and snippets.

@stigtsp
Created December 19, 2022 17:13
Show Gist options
  • Save stigtsp/caa7cfdad6b224d6be1ecc0570af0b47 to your computer and use it in GitHub Desktop.
Save stigtsp/caa7cfdad6b224d6be1ecc0570af0b47 to your computer and use it in GitHub Desktop.
#! /usr/bin/env nix-shell
#! nix-shell <nixpkgs> -i perl -p perl perlPackages.Mojolicious perlPackages.IOSocketSSL
use ojo;
g("https://www.kernel.org")->dom
->find("table#releases tr")
->each(sub {
my $td = $_->find("td");
printf("%13s %-14s %s\n",
map { $td->[$_]->all_text(0) } 0..2 );
});
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment