(my $file = "c:/progra~1/apache~1/apache2/cgi-bin/test/new/Feb23-2006_0_test_error.txt")=~ s/.*\///g;
print $file;