h3xx
/
simplify_static_dir
mirror of https://codeberg.org/h3xx/simplify_static_dir
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix join()ed readline (PBP) 

Use $/ to slurp the whole handle instead of splitting and joining.
This commit is contained in:
Dan Church 2023-07-20 14:00:46 -05:00
parent 9115c6bdca
commit d6be215a06
Signed by: h3xx
GPG Key ID: EA2BF379CD2CDBD0
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
t/TestFunctions.pm
View File

@ -121,10 +121,11 @@ sub run_script_capture {
seek $handle, 0, 0; seek $handle, 0, 0;
} }
local $/;
return ( return (
$?, $?,
(join "\n", <CATCHOUT>), scalar <CATCHOUT>, # slurp!
(join "\n", <CATCHERR>) scalar <CATCHERR>, # slurp!
); );
} }