From 26a254ddaabe2a35d60ff4b9336e522bceb2e5a5 Mon Sep 17 00:00:00 2001 From: Slaven Rezic Date: Tue, 22 Mar 2016 00:54:30 +0000 Subject: [PATCH] fix stat() and lstat() calls for perl 5.23.3+ (#291) --- lib/perl5i/2.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/perl5i/2.pm b/lib/perl5i/2.pm index 961f08d..aa3682c 100644 --- a/lib/perl5i/2.pm +++ b/lib/perl5i/2.pm @@ -188,12 +188,12 @@ sub perl5i_die { # File::stat does not play nice in list context sub stat { - return CORE::stat(@_) if wantarray; + return CORE::stat($_[0]) if wantarray; return File::stat::stat(@_); } sub lstat { - return CORE::lstat(@_) if wantarray; + return CORE::lstat($_[0]) if wantarray; return File::stat::lstat(@_); }