$dir = "/usr/spool/uucppublic/book_prod";

unless(-d $dir){

	`mkdir $dir`;
}