Anonymous user
Walk a directory/Non-recursively: Difference between revisions
rearranges in order of the language.
(rearranges in order of the language.) |
|||
Line 5:
'''Note:''' Please be careful when running any code presented here.
=={{header|8th}}==▼
<lang forth>▼
"*.c" f:glob \ puts an array of strings with the file names on the top of the stack▼
</lang>▼
=={{header|68000 Assembly}}==
Line 192 ⟶ 187:
patternParsed
dcb.b sizeof_patternString*2+2</lang>
▲=={{header|8th}}==
▲<lang forth>
▲"*.c" f:glob \ puts an array of strings with the file names on the top of the stack
▲</lang>
=={{header|Ada}}==
Line 345:
return 0;
}</lang>
=={{header|C sharp|C#}}==▼
<lang csharp>using System;▼
using System.IO;▼
namespace DirectoryWalk▼
{▼
class Program▼
{▼
static void Main(string[] args)▼
{▼
string[] filePaths = Directory.GetFiles(@"c:\MyDir", "a*");▼
foreach (string filename in filePaths)▼
Console.WriteLine(filename); ▼
}▼
}▼
}▼
</lang>▼
=={{header|C++}}==
Line 371 ⟶ 389:
}
}</lang>
▲=={{header|C sharp|C#}}==
▲<lang csharp>using System;
▲using System.IO;
▲namespace DirectoryWalk
▲{
▲ class Program
▲ {
▲ static void Main(string[] args)
▲ {
▲ string[] filePaths = Directory.GetFiles(@"c:\MyDir", "a*");
▲ foreach (string filename in filePaths)
▲ Console.WriteLine(filename);
▲ }
▲ }
▲}
▲</lang>
=={{header|ColdFusion}}==
Line 408:
dirEntries(".", "*.*", SpanMode.shallow).writeln;
}</lang>
=={{header|DCL}}==
<pre>* matches any number of characters
Line 573 ⟶ 574:
IF( INDEX(filename, "\.txt|\.hic|\.jpg", 128) ) WRITE() filename
ENDDO</lang>
=={{header|IDL}}==▼
<lang idl>f = file_search('*.txt', count=cc)▼
if cc gt 0 then print,f</lang>▼
(IDL is an array language - very few things are ever done in 'loops'.)▼
=={{header|Icon}} and {{header|Unicon}}==
Line 595 ⟶ 591:
}
end</lang>
▲=={{header|IDL}}==
▲<lang idl>f = file_search('*.txt', count=cc)
▲if cc gt 0 then print,f</lang>
▲(IDL is an array language - very few things are ever done in 'loops'.)
=={{header|J}}==
Line 648 ⟶ 649:
filter docfiles with "*.txt"
put docfiles</lang>
=={{header|Lua}}==
Line 741:
for file in walkFiles "/foo/bar/*.mp3":
echo file</lang>
=={{header|Objective-C}}==▼
<lang objc>NSString *dir = @"/foo/bar";▼
// Pre-OS X 10.5▼
NSArray *contents = [[NSFileManager defaultManager] directoryContentsAtPath:dir];▼
// OS X 10.5+▼
NSArray *contents = [[NSFileManager defaultManager] contentsOfDirectoryAtPath:dir error:NULL];▼
for (NSString *file in contents)▼
if ([[file pathExtension] isEqualToString:@"mp3"])▼
NSLog(@"%@", file);</lang>▼
=={{header|Objeck}}==
Line 769 ⟶ 757:
}
}</lang>
▲=={{header|Objective-C}}==
▲<lang objc>NSString *dir = @"/foo/bar";
▲// Pre-OS X 10.5
▲NSArray *contents = [[NSFileManager defaultManager] directoryContentsAtPath:dir];
▲// OS X 10.5+
▲NSArray *contents = [[NSFileManager defaultManager] contentsOfDirectoryAtPath:dir error:NULL];
▲for (NSString *file in contents)
▲ if ([[file pathExtension] isEqualToString:@"mp3"])
▲ NSLog(@"%@", file);</lang>
=={{header|OCaml}}==
Line 963:
... *.rkt files ...
</lang>
=={{header|Raven}}==▼
<lang raven>'dir://.' open each as item▼
item m/\.txt$/ if "%(item)s\n" print</lang>▼
=={{header|Rascal}}==
Line 974 ⟶ 970:
endsWith(entry, pattern) ? println(entry);
}</lang>
▲=={{header|Raven}}==
▲<lang raven>'dir://.' open each as item
▲ item m/\.txt$/ if "%(item)s\n" print</lang>
=={{header|REXX}}==
| |||