my @ts_dir = $ENV{QUERY_STRING};
my $user_id = $ENV{IWUSER};