Re: interpolation OPEN white spaces

The list form of open for reading from processes is not really supported by Windows. Personally, I use the string form with whitespace properly quoted for Windows:

my $cmd = qq(files\\pdftotext "$path_folder/$TextID" |);
my $pid = open (FILE, $cmd)
    or die "Couldn't spawn [$cmd]: $! / $?";
$text = do { local($/); <FILE> };
close FILE;
[download]

Comment on Re: interpolation OPEN white spaces Download Code

Replies are listed 'Best First'.
Re^2: interpolation OPEN white spaces by choroba (Cardinal) on Jan 20, 2016 at 10:32 UTC
Upgrade! List form of pipe open implemented for Win32. Moreover, the OP didn't use the list form of open. There were the quotes missing, though. ($q=q:Sq=~/;[c](.)(.)/;chr(-\|\|-\|5+lengthSq)`"S\|oS2"`map{chr \|+ord }map{substrSq`S_+\|`\|}3E\|-\|`7**2-3:)=~y+S\|`+$1,++print+eval$q,q,a, [download]	[reply] [d/l]
Re^3: interpolation OPEN white spaces by Anonymous Monk on Jan 20, 2016 at 10:41 UTC
Moreover, the OP didn't use the list form of open. He did, he edited the post later.	[reply]
Re^4: interpolation OPEN white spaces by choroba (Cardinal) on Jan 20, 2016 at 10:45 UTC
OK, my apologies to Corion. The link to How do I change/delete my post? sent to the OP. ($q=q:Sq=~/;[c](.)(.)/;chr(-\|\|-\|5+lengthSq)`"S\|oS2"`map{chr \|+ord }map{substrSq`S_+\|`\|}3E\|-\|`7**2-3:)=~y+S\|`+$1,++print+eval$q,q,a, [download]	[reply] [d/l]
Re^2: interpolation OPEN white spaces by welleozean (Novice) on Jan 20, 2016 at 09:03 UTC
Thank you! That is! It works perfectly, provided the "-" is used. I just correct it here for future reference. `my $cmd = qq(files\\pdftotext "$path_folder/$TextID" - \|); my $pid = open (FILE, $cmd) or die "Couldn't spawn [$cmd]: $! / $?"; $text = do { local($/); <FILE> }; close FILE;` [download]	[reply] [d/l]