First, your split seems to be a bit off. You are asking for a "space and one character" and I think you are looking for "dot and anything else." If that is the case, try this for the split:

my ($junk, $extension) = split /\./, $pubupload;
[download]

That should get you this:

$junk = C:\Documents and Settings\Administrator\Desktop\china
$extension = txt
[download]

Hope that helps...

D a d d i o