for( glob("*") ) {
    stat $_; # Useless code
    unlink $_;
}