#!/usr/bin/perl -w require 'config.pl'; print "Content-type:text/html\n\n"; print $variable; #### $v1 = 'something'; ..... $variable = 'hello world'; $flag = 0; #### $v1 = 'something'; ..... $variable = 'hello world'; $flag = 1;
## $v1 = 'something'; ..... $variable = 'hello world'; $flag = 0; ##
## $v1 = 'something'; ..... $variable = 'hello world'; $flag = 1;