$ret = GUI::GetSaveFileName(
    -title  => "Save your newly generated Mail Merge Document.",
    -file   => "\0" . " " x 256,
    -filter => [
        "Word documents (*.doc)" => "*.doc", 
        "All files", "*.*",
    ],