X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/4b28462f6dccd2437a3313b02a2ec678a4bf674b..c7df83034e6c7443c0f7ed602dfa1a31714b4235:/common.inc.plp diff --git a/common.inc.plp b/common.inc.plp index d51e3e6..4c0f1ff 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -4,7 +4,7 @@ use strict; use warnings; no warnings 'qw'; # you know what you doing no warnings 'uninitialized'; # save some useless checks for more legible code -use open IO => ':utf8'; +use open ':std' => ':utf8'; use File::stat 'stat'; use HTTP::Date; @@ -61,7 +61,7 @@ sub Html { # announce and check data modification checkmodified( $ENV{SCRIPT_FILENAME}, - (grep { /^Shiar_/ } values %INC), + (grep { /\bShiar_/ } values %INC), $meta->{data} ? @{ $meta->{data} } : (), );