How to perform syntax check for Perl program
Answer:
Assume you have a Perl script test.pl, try run the command
perl -c test.pl
Syntax error will be displayed without running the code actually.
Jan 022010
Jan 022010
How to sort a hash in Perl
Answer:
# %hash is the hash to sort
@keys = sort { criterion() } (keys %hash);
foreach $key (@keys) {
$value = $hash{$key};
# do something with $key, $value
}
Dec 312009
How to pretty print my.cnf with a one-liner?
Answer:
A very cool command.
perl -ne 'm/^([^#][^\s=]+)\s*(=.*|)/ && printf("%-35s%s\n", $1, $2)' /etc/my.cnf
Reference: http://www.mysqlperformanceblog.com/2009/06/15/how-to-pretty-print-mycnf-with-a-one-liner/
Dec 312009
How to check if a Perl module is already installed?
Answer:
For example, to check if the DBI module is installed or not, use
perl -e 'use DBI;'
You will see error if not installed.
Apr 142009
Split a string into array in Perl
Answer:
To split a string into an array in Perl, follow the codes below
my $data = 'peter,mary,john';
my @values = split(',', $data);
