#!/usr/bin/perl print "Content-type: text/html\n\n"; print "\n"; print "Change Pass\n"; print ''; print '
'; print "Old Pass : ".''."
"; print "New Pass : ".''."
"; print "Confirm Pass: ".''."
"; print ''; print ''; print ''; print '';