Annotation of loncom/metadata_database/lonsql.pm, revision 1.2
1.1 harris41 1: # The LearningOnline Network with CAPA
2: # Metadata Database Handler
3: #
4: # 02/20/2001 Scott Harrison
5:
6: package Apache::lonsql;
7:
8: use strict;
1.2 ! harris41 9: use Opcode;
! 10: use Apache::lonnet;
! 11: use Apache::Constants qw(:common :http);
1.1 harris41 12:
13:
1.2 ! harris41 14:
! 15: # ================================================================ Main handler
! 16: #
! 17: # Interactive call to screen
! 18: #
! 19: #
! 20:
! 21: sub handler {
! 22: my $r=shift;
! 23: my $output=<<END;
! 24: Content-type: text/html
! 25:
! 26: <H1>Test output message for lonsql.pm</H1>
! 27: END
! 28: $r->print($output);
! 29: return OK;
! 30: }
1.1 harris41 31:
32:
33:
34: 1;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>