#$input =;
#chop($input);
$input ="fil";
$input ="c:\\perl\\robin\\temp\\*${input}*";
print glob($input);
unlink glob($input);

    Source: geocities.com/siliconvalley/park/8312

               ( geocities.com/siliconvalley/park)                   ( geocities.com/siliconvalley)