diff options
author | Frédéric Buclin <LpSolit@gmail.com> | 2011-08-17 13:18:47 +0200 |
---|---|---|
committer | Frédéric Buclin <LpSolit@gmail.com> | 2011-08-17 13:18:47 +0200 |
commit | 45a4eea5b94d5a90aa83014c51366d42c39ed746 (patch) | |
tree | 246c8c9a9e038fd40872601a852422cee8039fc3 /report.cgi | |
parent | 589632e9d5d35c25c932aafa164feb92c26f5e3d (diff) | |
download | bugs-45a4eea5b94d5a90aa83014c51366d42c39ed746.tar bugs-45a4eea5b94d5a90aa83014c51366d42c39ed746.tar.gz bugs-45a4eea5b94d5a90aa83014c51366d42c39ed746.tar.bz2 bugs-45a4eea5b94d5a90aa83014c51366d42c39ed746.tar.xz bugs-45a4eea5b94d5a90aa83014c51366d42c39ed746.zip |
Bug 662070: Use say() instead of print() where appropriate
r=glob a=LpSolit
Diffstat (limited to 'report.cgi')
-rwxr-xr-x | report.cgi | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/report.cgi b/report.cgi index a71776bfe..20e899a6b 100755 --- a/report.cgi +++ b/report.cgi @@ -287,10 +287,10 @@ print $cgi->header(-type => $format->{'ctype'}, # prints out both data structures. if ($cgi->param('debug')) { require Data::Dumper; - print "<pre>data hash:\n"; - print Data::Dumper::Dumper(%data) . "\n\n"; - print "data array:\n"; - print Data::Dumper::Dumper(@image_data) . "\n\n</pre>"; + say "<pre>data hash:"; + say Data::Dumper::Dumper(%data); + say "\ndata array:"; + say Data::Dumper::Dumper(@image_data) . "\n\n</pre>"; } # All formats point to the same section of the documentation. |