#Get the current component's session information
my $current = $m->current_comp();

#Get the current directory relative the the web server's
#root directory.
my $directory = $current->dir_path;