LINUX ADMINISTRATION NOTES & CODE SNIPPETS

Simple perl to postgresql examples:
#!/usr/bin/perl
#load perl postgresql module
use DBI;
$postgresql_database=yourpostgresdatabase;
$postgresql_user=yourpostgresuser;
$postgresql_password=yourpostgrespass;
$postgresql_host=localhost;
# connect to perl to postgresql database
my $dbh = DBI->connect(”DBI:Pg:dbname=$postgresql_database;
host=$postgresql_host”, “$postgresql_user”, “$postgresql_password”);
# EXAMPLE PERL and POSTGRESQL
# CREATE TABLE EXAMPLE
$sth = $dbh->prepare(”CREATE TABLE perl_postgres
( language varchar(40), version integer);”);
$sth->execute();
# EXAMPLE PERL and POSTGRESQL
# INSERT DATA INTO TABLE
$dbh->do(”INSERT INTO perl_postgres(language, version)
VALUES (?, ?)”, undef, (’perl’, 5)) or die (”Cannot INSERT”);
# [...]

Filed under: Administration, Database, Linux, Perl | No Comments »

Match or validate an email address with perl regex ( regular expression )
This perl script shows how to validate an email address using perl and regular expression ( regex ).
#!/usr/bin/perl
@email = (”email\@address”,”email\@address.email”,
“\@address.email”,”address.email\@email”, “validate\@email.address”);
foreach (@email) {
if (/^[A-z0-9_\-]+[@][A-z0-9_\-]+([.][A-z0-9_\-]+)+[A-z]{2,4}$/) {
print “$_\n”;
}
}
Result:
email@address.email
validate@email.address

Filed under: Linux, Perl, Programming | No Comments »

First install soundconvert linux package. This allows you to convert between ogg and mp3 sound media formats. On debian or ubuntu simply:
apt-get install soundconvert
to convert from ogg format to mp3 format use command:
soundconvert.pl -o mp3 mediamusic.ogg
to convert from mp3 format to ogg format use command:
soundconvert.pl -o ogg mediamusic.mp3
If you wish to convert all files [...]

Filed under: Commands, Linux, Perl | 5 Comments »