RPM Package Manager, CVS Repository
  http://rpm5.org/cvs/
  ____________________________________________________________________________

  Server: rpm5.org                         Name:   Arkadiusz Miskiewicz
  Root:   /v/rpm/cvs                       Email:  arekm@rpm5.org
  Module: rpm                              Date:   26-Aug-2008 20:44:53
  Branch: HEAD                             Handle: 2008082618445300

  Modified files:
    rpm/scripts             perl.req

  Log:
    Bugfix for statements like:
    use base qw(DBIx::SearchBuilder RT::Base);

  Summary:
    Revision    Changes     Path
    1.16        +1  -1      rpm/scripts/perl.req
  ____________________________________________________________________________

  patch -p0 <<'@@ .'
  Index: rpm/scripts/perl.req
  ============================================================================
  $ cvs diff -u -r1.15 -r1.16 perl.req
  --- rpm/scripts/perl.req	20 Aug 2008 20:07:56 -0000	1.15
  +++ rpm/scripts/perl.req	26 Aug 2008 18:44:53 -0000	1.16
  @@ -146,7 +146,7 @@
          /x
         )
       {
  -        my @deps = ( $1 ? split /\s+/, $2 : $3 ? split /\s+/, $4 : $5 );
  +	my @deps = ( $1 ? split /\s+/, $2 : $3 ? $4 : split /\s+/, $5 );
           for my $mod ( grep !exists $require{$_}, @deps ) {
               $require{$mod} = '';
               $line{$mod}    = $_;
  @@ .