Hi sivaramanm, Use double quotes in argument of pdftotext.exe like this,

system("c:\/Tools\/pdftotext.exe \"$_\"");
[download]

Assign $ARGV[0] value to a variable directly as:

my $root_dir = $ARGV[0];
[download]

return if ! /\.pdf?/i;

In the return statement, you made couple of mistakes, it should be

return if !~ /\.pdf$/i;
[download]