perl 5.003_01: t/lib/filehand.t

[p5sagit/p5-mst-13.2.git] / perly.y

diff --git a/perly.y b/perly.y
index 96a35e1..57c9630 100644 (file)
--- a/perly.y
+++ b/perly.y
@@ -267,8 +267,8 @@ package :   PACKAGE WORD ';'
                        { package(Nullop); }
        ;
 
-use    :       USE startsub WORD listexpr ';'
-                       { utilize($1, $2, $3, $4); }
+use    :       USE startsub WORD WORD listexpr ';'
+                       { utilize($1, $2, $3, $4, $5); }
        ;
 
 expr   :       expr ANDOP expr