my $user = "User";

open(USER, ">$user.txt") || die "Can't create user file $user.txt: $!"
+;

print USER "foo";#user data goes here
[download]

This assumes you have the proper write permissions on your server of course.