From 803b07a779c719a9176a69ed7eb5685bb9f23042 Mon Sep 17 00:00:00 2001 From: Ilya Zakharevich Date: Fri, 13 Dec 2002 05:47:08 -0800 Subject: [PATCH] deprecated warnings Message-ID: <20021213214707.GA2588@math.berkeley.edu> p4raw-id: //depot/perl@18315 --- lib/constant.t | 2 +- lib/fields.t | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/constant.t b/lib/constant.t index a5ffb2c..51902eb 100644 --- a/lib/constant.t +++ b/lib/constant.t @@ -10,7 +10,7 @@ use vars qw{ @warnings }; BEGIN { # ...and save 'em for later $SIG{'__WARN__'} = sub { push @warnings, @_ } } -END { print @warnings } +END { print STDERR @warnings } use strict; diff --git a/lib/fields.t b/lib/fields.t index adfe60a..a505194 100755 --- a/lib/fields.t +++ b/lib/fields.t @@ -10,7 +10,7 @@ BEGIN { $w++; return; } - print $_[0]; + print STDERR $_[0]; }; } -- 2.7.4