diff options
Diffstat (limited to 'utils/h2xs.PL')
-rw-r--r-- | utils/h2xs.PL | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/h2xs.PL b/utils/h2xs.PL index 6c41ea9cdd..ee4079f8ea 100644 --- a/utils/h2xs.PL +++ b/utils/h2xs.PL @@ -893,7 +893,7 @@ if( @path_h ){ } else { # Work from miniperl too - on "normal" systems - my $SEEK_SET = eval 'use Fcntl qw/SEEK_SET/; SEEK_SET' or 0; + my $SEEK_SET = eval 'use Fcntl qw/SEEK_SET/; SEEK_SET' || 0; seek CH, 0, $SEEK_SET; my $src = do { local $/; <CH> }; close CH; |