Shell Programming and Scripting

Hi,

In my perl script I want to check whether *.csv files exist and take the count .
Below is the code:

Code:

$path = “/home/usr/jan/myfiles”
my $File_Count = `ls *.csv | wc -l `; # Checks in the current directory #Works fine if files exists.
my $File_Count = `ls $path/*.csv | wc -l `; # I need to Modify this to check in the $path directory

question:
1. First line of code throws error “ls: cannot access *.csv: No such file or directory” when there are no .csv files in the directory. This error msg is displayed on the screen. Can we hide this from dislplaying but I need to capture the output of this line as I need to do further checking based on this output.
2. Is there any way we can pass the $path to the second line?


Regards,
Js

Some pointers here http://www.devdaily.com/blog/post/pe...ystem-commands

Wrong sort of quotes?

Code:

$path = '/home/usr/jan/myfiles'

To lose the error uin normal unix shell. Others will be able to advise whether it is valid within a Perl system command.

Code:

ls *.csv 2>/dev/null | wc -l