Current Path :
/
usr
/
share
/
perl5
/
CGI
/
examples
/
Or
Select Your Path :
Upload File :
New :
File
Dir
//usr/share/perl5/CGI/examples/nph-multipart.cgi
#!/usr/local/bin/perl use CGI qw/:push -nph/; $| = 1; print multipart_init(-boundary=>'----------------here we go!'); while (1) { print multipart_start(-type=>'text/plain'), "The current time is ",scalar(localtime),"\n", multipart_end; sleep 1; }
