Re^2: how to dir a directory that have space

Replies are listed 'Best First'.
Re^3: how to dir a directory that have space by vkon (Curate) on Jan 16, 2015 at 10:15 UTC
works for me, perl -we "system('dir','/b/s','/o:-d',shift)" "Program Files" C:\Program Files\Internet Explorer C:\Program Files\Microsoft Office C:\Program Files\Syncplicity C:\Program Files\McAfee C:\Program Files\WinDjView C:\Program Files\Synaptics C:\Program Files\Realtek C:\Program Files\Microsoft Silverlight C:\Program Files\Windows Journal C:\Program Files\Java C:\Program Files\Microsoft Policy Platform C:\Program Files\Common Files C:\Program Files\Lenovo C:\Program Files\Courion Corporation C:\Program Files\Windows Defender ... [download] indeed, there was dir.exe in cygwin in my setup that I needed to expunge before running the one-liner	[reply] [d/l]
Re^4: how to dir a directory that have space by BrowserUk (Patriarch) on Jan 16, 2015 at 10:58 UTC
Well I never, bless my soul, so it does. (In this case...) I stand corrected! On Windows, parameters are passed to executables as a single string, so the list forms of system & open etc., join the list into a single string before calling CreateProcess(). There is some intelligence involved in the concatenation, but in many, (by my experience: most) cases, that 'intelligence' flies in the face of expectation, and gets it wrong. With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday' Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice. Agile (and TDD) debunked	[reply]
Re^4: how to dir a directory that have space (examples) by BrowserUk (Patriarch) on Jan 16, 2015 at 11:32 UTC
By way of example of the inconsistent nature of the internal handling of the list form: `system 'perl', '-E', 'say 12345;';; ## Works! 12345 system 'perl', '-E', 'say "hello world";';; ## Doesn't work. system 'perl', '-E', 'say \"hello world\";';; ## Doesn't work. system 'perl', '-E', '"say \"hello world\";"';; ## Works! hello world system 'perl', '-E', '\"say \"hello world\";\"';; ## Doesn't work, Can't find string terminator '"' anywhere before EOF at -e line 1.` [download] With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday' Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice. Agile (and TDD) debunked	[reply] [d/l]
Re^5: how to dir a directory that have space (examples) by Anonymous Monk on Jan 16, 2015 at 11:46 UTC
By way of example of the inconsistent nature of the internal handling of the list form: Apparently perl isn't to blame, see exec always invokes the shell? win32 Win32::ShellQuote can be a cure	[reply]
Re^6: how to dir a directory that have space (examples) by BrowserUk (Patriarch) on Jan 16, 2015 at 12:34 UTC
Re^7: how to dir a directory that have space (examples) by Anonymous Monk on Jan 16, 2015 at 12:50 UTC
Some notes below your chosen depth have not been shown here
Re^3: how to dir a directory that have space by AtlasFlame (Novice) on Jan 16, 2015 at 09:09 UTC
No it does not work.	[reply]
Re^4: how to dir a directory that have space by Anonymous Monk on Jan 16, 2015 at 09:17 UTC
Sure it does, sure it works, provided you don't have a dir.exe installed ( Re: Backtick failure in Windows 7 (common pitfall), Re^2: perl windows backtick problem, Re^2: IPC::Run3 error ) If you want it more robust ("avoid" shell) and capture the output see Re^3: how to dir a directory that have space I've tested both of them and they both work ( Re^3: how to dir a directory that have space and Re: how to dir a directory that have space )	[reply]
Re^4: how to dir a directory that have space by BrowserUk (Patriarch) on Jan 16, 2015 at 09:29 UTC
No it does not work. Works for me: C:\test>perl -we"my $dir = 'c:\\program files\\'; print for `dir \"$di +r\" /s /b /o:-s`" c:\program files\7-Zip c:\program files\Bin c:\program files\Common Files c:\program files\Core Temp c:\program files\CPUID c:\program files\Direct Modeling Express 4.0 c:\program files\Extras c:\program files\GlowCode 9.0 c:\program files\Hitman Pro 3.5 ... [download] With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday' Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice. Agile (and TDD) debunked	[reply] [d/l]
Re^5: how to dir a directory that have space by AtlasFlame (Novice) on Jan 18, 2015 at 11:05 UTC
It works ok if run it in single line. But when i put it in script it does not. Anyway i'm using below code to do the same and it's working ok. Basically i'm searching for newest specific file name in sub-folders that starts with "K" `opendir my $dh, $source_directory or die "error: open '$source_directo +ry'"; my @paths = grep { /^K/} readdir $dh; closedir $dh; $p=0; foreach (@paths){ opendir SUB_DIR,"$source_directory$paths[$p]"; while(our $file = readdir(SUB_DIR)) { if(($file =~ /$ID/) && ($file =~ /xls$/)){ @files = $file; @FilePath = "$source_directory$paths[$p]"; } } $p++; } print "\nFile = $FilePath[0]\\$files[0]\n";` [download]	[reply] [d/l]


Keep It Simple, Stupid
	PerlMonks