now im i managed to use File::Basename. with this code

#!/usr/bin/perl -w

use strict;
use warnings;

use File::Basename;

my $path  = "/usr/bin/*";
my $files = basename($path);
my $dir   = dirname($path);

print "dir is $dir , files is $files\n";

system "whatis $path";
[download]

the output of $files is listening all files in the directory - so far so good , but im still stuck with the same problem - the script is not giving me the real whatis command Output. any idea?