Shell Programming and Scripting

Hi

Can any one please support:

From Windows, I am running perl script located in C:/scripts directory and need to run a command "ls | sort | uniq" on the files in D:/temp directory.

Code:

 
#!c:\perl\bin\perl.exe

$file_dir="D:\\temp";
$command1="cd";
$command2="ls | sort | uniq";
$cmd=`"$command1" "$file_dir"`;
$uniq_file=`"$command2" "$cmd"`;
print "$last_file";

can any one please correct I get the following error:
'"cd"' is not recognized as an internal or external command
and secondly the script perform the the task on the present location and does not go to D:/temp.

thanks in advance.

I don't know DOS well at all but I doubt "uniq" is there either. But then again, why would you need that ? Each filename has to be unique. Try to avoid system() and backtick calls to have your script portable. This might work:

Code:

#!/usr/local/bin/perl

use strict;

opendir (DIR, "D:\\TEMP\");

while (my $file = readdir(DIR)) {
   print $file;
}

If for some reason I'm missing something and you indeed have multiple files with the same name, maintain a list of unique ones by using a hash with the filename as a key:

Code:

my %filehash;

while (my $file = readdir(DIR)) {
  ++$filehash{$file};
}

foreach (keys %filehash) {
  print $filehash{$_};
}

'cd' isn't a command, but a built-in of cmd.exe. If you want to code Perl, use chdir instead.

As for the rest: Sandman already told the important stuff.