X-Git-Url: http://git.shiar.nl/perl/plp/.git/blobdiff_plain/00e00b2ea57d60ba23b3d224ed8fadddb8d05e59..9f59e7b75435e82578bc66328032e0d3510c5690:/eg/plpinfo.plp

diff --git a/eg/plpinfo.plp b/eg/plpinfo.plp
index 9b3b704..f25dc76 100644
--- a/eg/plpinfo.plp
+++ b/eg/plpinfo.plp
@@ -66,7 +66,7 @@ printf("<tr><th>%s</th><td>%s</td></tr>\n",
 
 <table border="1">
 <:
-for my $var qw(get post cookies header) {
+for my $var (qw[ get post cookies header ]) {
 	printf("<tr><th>%s{'%s'}</th><td>%s</td></tr>\n",
 		$var, $_, defined $$var{$_} ? $$var{$_} : "<i>no value</i>"
 	) for sort keys %$var;