[fpc-pascal]opening files from a text list
Laurent Cocea
cocea at canada.com
Sat Nov 29 15:12:42 CET 2003
Or you could wrap it around a Perl script. Perl is particularly good at
parsing text and generating arrays from strings and vice-versa. And then
you can call your Pascal-generated code from within the script using the
array elements as arguments, liek this:
#!/usr/bin/perl -w
my @arguments;
my $arg;
open INF "<your_file.txt";
while (<INF>) {
chomp; # delete EOLN char
@arguments = split(/ /, $_); # generate arguments array from string
}
close INF;
foreach $arg @args {
if ( $arg =~ m/[a-z][0-9]\_/i ) { # validate param string
system("your_pascal-generated_binary_here $arg");
} else {
print "Skipped invalid argument $arg.\n";
}
}
and then your Pascal code would use ParamStr() to read "command line"
arguments, that is, the file name(s).
More information about the fpc-pascal
mailing list