X-Git-Url: http://git.shiar.net/perl/plp/.git/blobdiff_plain/b5e0ee87251670be18b2f2fc128a4be0b25ebfb8..eadf5be66f5ada7c6f973e0e7cf5b85985dd6e80:/lib/PLP/Backend/CGI.pm

diff --git a/lib/PLP/Backend/CGI.pm b/lib/PLP/Backend/CGI.pm
index e4bcf1e..5d45500 100644
--- a/lib/PLP/Backend/CGI.pm
+++ b/lib/PLP/Backend/CGI.pm
@@ -61,7 +61,7 @@ sub init {
 
 sub read ($) {
 	my ($bytes) = @_;
-	read *STDIN, my $data, $bytes;
+	read *STDIN, my ($data), $bytes;
 	return $data;
 }