The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

#! perl
use strict;
our $VERSION = "1.01";
our $name = "Sinfest";
our $url = "https://sinfest.xyz/";
our $pattern =
qr{ <img \s+
src="(?<url>btphp/comics/(?<image>\d+-\d+-\d+\.(?:jpg|gif)))" \s+
alt="(?<alt>.*?)"
}x;
# Important: Return the package name!
__PACKAGE__;