Perl scripts for finding URLs of Squishdot posts.

In your Squishdot site go to "Manage Postings" and save the page to a file.

Then run the following Perl script, passing the filename that you saved the page to as a parameter:


#!c:\perl\bin -wnl

if(/.<*A HREF="(\d+)*/)
{print $1;
$first += 1;
if($first == 1)
{print "The first match is on line $.";}
}

Check that the above result is correct.

Then run:

#!c:\perl\bin -wnl

if(/.*