<& /templates/login_panel.mas &> <& /templates/gws_services.mas &>

contact groovy web services   <%perl> ## convert string to hex uri encoding ## my $string = 'admin@groovy-web.com'; my ($char, $uri); for (my $i = 0; $i <= length($string); $i ++) { ## convert to uri enc ## $char = '%' . sprintf("%1x", ord(substr($string, $i, 1))); if ($char ne '%0') { $uri .= $char; } } phone +1 604.417.1021     email admin@groovy-web.com     msn enterpriseengineer@groovy-web.com aol groovcom icq 172038085

...   survey   <& /templates/random_quote.mas &>

copyright © 2003, groovy web services - last modified on <% $last_mod %>

<%init> ## last modified time ## use Time::Piece; my $comp_time = (stat $m -> current_comp -> source_file)[9]; my $last_mod = Time::Piece -> strptime( $comp_time, '%s') -> strftime ('%B %e, %Y %H:%M'); ## current server time ## my $lst_time = localtime();