Hi all,

say that 

$directory = "C:\\directory\\*.*"

and I am trying to remove the *.* from the end  using

$directory = trim($directory);


where 

trim is

sub trim {
   my( $result) = @_;

 $result =~ s/^\s+(.*?)\s+$/$1/; 
 $result =~ s/\s//g; 
 return $result;
}


Can anybody point me out why it is not working?

TIA

Jair

Reply via email to