Make your own free website on Tripod.com

Home
My Book Shelf
About Me
Childhood
My Parents
My Sister
My Fiancée
IT Conferences
Family Photo Album
Academic Research
PresentWorkingEnvironment
B. Sc. Thesis
Guest Book for Visitors
Pathfinders
plfeedback_form
#!/usr/bin/perl # use warnings; use strict; use CGI qw( :standard ); our ( $data, $name, $value ); read( STDIN, $data, $ENV{ 'CONTENT_LENGTH' } ); ( $name, $value ) = split( '=', $data ); print header(), start_html( 'POST' ); print p( 'Enter word here: ' ); print '
'; print ''; print ''; print '
'; if( $name eq 'word' ) { print p( 'The word is: ', b( $value ) ); } print end_html();