jxluoix的专栏

mysql_select.pl:   use strict; use DBI; #my($dbh) = DBI->connect("DBI:mysql:it-community", "root", "jxcoco1128", "") or die "can't connect!\n"; my $dbh = DBI->connect("DBI:mysql:data

Perl on windows platform   ActivePerl   http://www.activestate.com   Installation   http://www.activestate.com/activeperl/downloads   Perl Binaries: ActivePerl-5.14.2.1402-MSWin32-x86-295...

# # Program to calculate the circumference of circle # The constant variable of PI $pi = 3.14159265; # This section is to calculate the circumference of circle # (whose radius is 12.5) $radius =...

$count = 5; $ss = "12345"; print "$ss\n" x $count; print "--------------------------\n"; print "Pls input a string: "; $ss = <STDIN>; print "Pls the count of string to display: "; $co

#!D:/usr/bin/Perl/Perl5.14.2/bin/perl.exe use strict; use DBI; use CGI; my $q = new CGI; #my $q = CGI->new; my $topicID = $q->param('id'); print "Topic ID: $topicID\n"; print "Content-type: text...