Does anyone know how I could center my Win32::GUI::GetOpenFileName dialog box in my window say $window_main?

    $directory_and_file_name = Win32::GUI::GetOpenFileName
    (
      -owner     =>  $window_main ,
      -size      =>  [ 400, 400 ] ,
      -directory =>  $directory ,
      -file      =>  $file ,
      -title     =>  'Open' ,
      -filter    =>  [ 'Text files' , '*.txt' , 'All files' , '*.*' ] 
+,
    ) ;
[download]