tech . greg milsted . com

if ($string1 eq $string2) { # equal too

print”\$string1 is equal to \$string2\n”;

} elsif ($string1 lt $string2) { # less than

print”\$string1 is less than \$string2\n”;

} elsif ($string1 gt $string2) { # greater than

print”\$string1 is greater than \$string2\n”;

}

if ($string1 ne $string2) { # not equal too

print “\$string1 is not equal to \$string2\n”;

}

ALTER TABLE tablename ADD newcolumnname VARCHAR(255);

Initialise a blank array and feed it some values.

$b = array();
$b[] = ‘a’;
$b[] = ‘b’;
$b[] = ‘c’;

Particularly useful if you want to loop over some database results and add to the array.

@errors;
push(@errors, ‘blah’);

foreach my $i (0..$#errors) {
print STDOUT “error $errors[$i]\n”;
}