@dir = sort {lc($a) cmp lc($b)} @dir;
	foreach $line (@dir) {
		if (-f "$config{'root_dir'}/$in{'username'}/$line") {
			@stat=stat("$config{'root_dir'}/$in{'username'}/$line");

			if ($stat[7] > 1000) { $stat[7] *= .001; $stat[7] = int($stat[7]); $stat[7] .= " KB"; }
			else { $stat[7] = int($stat[7]); $stat[7] .= " Bytes"; }

			$stat[9] = localtime($stat[9]);
			$list .= qq~
<tr>
<td width="30"><input type="radio" value="$line" name="file" onclick="document.files.file_input.value='$line'"></td>
<td width="250"><font face="Arial"><a href="$config{'root_url'}/$in{'username'}/$line" target="_window">$line</a></font></td>
<td width="100"><font face="Arial">$stat[7]</font></td>
<td><font face="Arial">$stat[9]</font></td>
</tr>~;