find (\&pstFind, ($dir) );

##</code><code>##

if ( /\.PST$/i ){