Help for this page
if( $Count = Win32::Test::GetFileSizes( 'c:\temp\*.*', $Data ) ) { .... }
XS( ExtensionGetFileSizes ) { .... }
XS( GetFileSizes ) { .... }