Best Language for this?

I want to have a user input text in a text field like "2008-6-30_today" ($file below) i then want that to create 5 xml files with that name each a different name in front and extension at end like "/video/2008-6-30_today.xml" inside that file i have xml script i'm putting in in which that same file name will locate other files. I was trying to do this with php and flash but couldnt do it. I was thinking flash might not be the best way possibly java or php alone without flash or an html form. I'll write what i want it to do in a mix of languges cause i dont know how i'd do it in one
----display page-----
Name: [input field called $file]
submit button [hit]
---hit state----
on (release) {
create file ("video/$file.xml");
create file ("photo/$file.xml");
create file ("text/$file.xml");
create file ("podcast/$file.xml");
create file ("speech/$file.xml");
in "video/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "photo/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "text/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "podcast/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "speech/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
}
on(keyPress "<Enter>") {
create file ("video/$file.xml");
create file ("photo/$file.xml");
create file ("text/$file.xml");
create file ("podcast/$file.xml");
create file ("speech/$file.xml");
in "video/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "photo/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "text/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "podcast/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
in "speech/$file.xml" write "yadayadayada xml scripts and such" $file "dont want anyspaces between them yadayadayada" $file "more xml etc."
}