| Subject: | [PATCH] "Too many arguments for open" under 5.005_03 |
Hi,
Perl 5.005_03 does not support the 3-parameter version of open(), so this simple patch fixes the "Too many arguments for open at blib/lib/CSS/Tiny.pm line 212" failure. This patch is totally neutral under newer perls.
--- lib/CSS/Tiny.pm.orig Thu Mar 24 00:10:53 2005
+++ lib/CSS/Tiny.pm Thu Mar 24 00:11:07 2005
@@ -209,7 +209,7 @@
my $file = shift or return $self->_error( 'No file name provided' );
# Write the file
- open( CSS, '>', $file ) or return $self->_error( "Failed to open file '$file' for writing: $!" );
+ open( CSS, '>'. $file ) or return $self->_error( "Failed to open file '$file' for writing: $!" );
print CSS $self->write_string;
close( CSS );