package newindex;

use strict;


sub getTitle {
	return "workers";
}

sub getContent {
	my $cgi = shift;
	
	$hashref = {
        'Adam'  => 'Eve',
        'Clyde' => 'Bonnie',
    };
	   
	 
	
	
	my $table = ;
	
	
	return $table; 
}

1;