if(Win32::OLE->LastError()=="true"){
#In case of error	
print Win32::OLE->LastError()."\n"if(Win32::OLE->LastError());
}
else{
print "Virtual Directory Create successfully with out Errors!\n";
}