Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

use Perl Log In

Log In

[ Create a new account ]

essuu (3384)

essuu
  (email not shown publicly)

Journal of essuu (3384)

Tuesday September 24, 2002
08:24 PM

WWW::UsePerl::Journal broken

[ #7984 ]
I suddenly noticed that richardc's dead handy journal-to-mail script has stopped working. A bit of digging identified changes to the use.perl.org user page as the culprit.

A simple change to the module fixed it (at least as far as it passes it's tests and runs the code I need it to :). It's been mailed to the relevant people but here's my patch in case you need it right now.

--- /usr/lib/perl5/site_perl/5.6.1/WWW/UsePerl/Journal.pm       Sun Mar  3 20:09:14 2002
+++ lib/WWW/UsePerl/Journal.pm  Wed Sep 25 02:15:14 2002
@@ -43,7 +43,7 @@
);

-$VERSION = '0.05';
+$VERSION = '0.06';

=head2 new

@@ -100,7 +100,7 @@
         my $content = $self->{ua}->request(GET UP_URL . "/~$user/")->content;
         die "Cannot connect to " . UP_URL unless $content;

-        $content =~ m#User info for $user \((\d+)\)#ism
+        $content =~ m#$user \((\d+)\)#ism
           or die "$user does not exist";
         $1;
     }

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.