$current = $File::Find::name; if(-f $current ) { filesScanned++; }