From 934a10d880197188d874db53646d35dc362c0f88 Mon Sep 17 00:00:00 2001 From: Elijah Perrault Date: Mon, 14 Feb 2011 20:45:09 -0700 Subject: [PATCH] Use say, not println. --- lib/API/Std.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/API/Std.pm b/lib/API/Std.pm index cdcbc3a..770444c 100644 --- a/lib/API/Std.pm +++ b/lib/API/Std.pm @@ -4,6 +4,7 @@ package API::Std; use strict; use warnings; +use feature qw(say); use Exporter; use base qw(Exporter); @@ -470,7 +471,7 @@ sub err ## no critic qw(Subroutines::ProhibitBuiltinHomonyms) # Level 1: Print to screen. if ($lvl >= 1) { - API::Log::println("ERROR: $msg"); + say "ERROR: $msg"; } # Level 2: Log to file. if ($lvl >= 2) { @@ -499,7 +500,7 @@ sub awarn # Level 1: Print to screen. if ($lvl >= 1) { - API::Log::println("WARNING: $msg"); + say "WARNING: $msg"; } # Level 2: Log to file. if ($lvl >= 2) {