Perl dbi tutorial

Error Installing PERL modules "unrecognized command line option -fstack -protector"

http://digitalpbk.com/perl/install-modules-unrecognized-command-line-option-fstack-protector Error Installing PERL modules "unrecognized command line option -fstack -protector" unrecognized command line option "-fstack-protector" error usually comes on Cygwin when installing PERL modules. For example when installing the DBI module or DBD::MySQL perl module, the following error comes on cygwin : cp lib/DBI/Gofer/Serializer/Base.pm blib/lib/DBI/Gofer/Serializer/Base.pm cp dbipport.h blib/arch/auto/DBI/dbipport.h cp lib/DBI/Gofer/Execute.pm blib/lib/DBI ...

cPanel Mail Forwarder

http://digitalpbk.blogspot.com/2007/07/perl-email-forwarder.html cPanel Mail Forwarder ForwarderThis handly little program forwardes all emails coming to a certain specified email address and forwards to a forwarding list.Setting up the email capturinge-Mail can be captured using a PERL script. The contents of the email must be pipped in. The capturing an passing of the email can be done through cPanel.Click MailClick ForwardersAdd ForwarderIn the text box to the right side, you can provide an email address or a path to your PERL program that can process ...

Perl - cPanel V3 and the @INC

http://digitalpbk.blogspot.com/2007/09/cpanel-v3-perl-include-inc.html Perl - cPanel V3 and the @INC Modifying @INC in a SCRIPTuse Module;is executed during compile time so if you modify the @INC array at run time it will not be reflected back in the compile time. So if you have to include any more include locations in the @INC inside a script, give it inside the BEGIN { }block.BEGIN{ push @INC,"location";}The BEGIN blocks are executed during compile time. So @INC is updated at compile time and the use module are correctly searched for in the updated ...

Perl script to remove a directory and contents recursively

http://digitalpbk.com/perl/perl-script-remove-directory-and-contents-recursively Perl script to remove a directory and contents recursively This is the script for sandeep when he asked me how to delete a directory in perl. rmdir function only removes empty directories. So we need to remove the contents of the directory before removing the directory. So if the directory contains more directories / folders we would have to recursively delete all the directories under the directory. Well so here is the code just to do that. #!/usr/bin/perl deldir("test"); ...

PERL: How to remove an element from hash or array?

http://digitalpbk.com/perl/how-remove-element-hash-or-array PERL: How to remove an element from hash or array? In order to remove an element from the array or hash, we have to use the delete keyword on perl. Using the delete keyword on the key of the hash or array (numeric keyed hash), we can delete elements of a hash or array. Example for deleting an element from a hash The following code deletes the key 'a' from the hash %hash. #!/usr/bin/perl $, = "\n"; # Fields separator my %hash = ( 'a' => 'aaa', 'b' ...

Perl ImageMagick convert Images from one format to another

http://digitalpbk.blogspot.com/2009/07/perl-imagemagick-convert-jpeg-png-bmp.html Perl ImageMagick convert Images from one format to another IntroductionA Picture speaks louder than a thousand words. Most of the programming problems I usually worked with and involved in where dealing with just TEXT. So now I wanted to programatically work with images. I needed to warp, rotate, scale, stretch, convert from jpeg to png, png to jpeg, jpeg to bmp, bmp to jpeg etc. So I decided to search on how to do such a thing easily. Well the first obvious answer is to do handle all ...

My First useful PERL program

http://digitalpbk.blogspot.com/2007/05/my-first-useful-perl-program.html My First useful PERL program #!/usr/bin/perl -w$username = $ARGV[0];$username = "s28arunpbk" if(!$username); ## Get the username from the first command line argument# If null assign my user id.#use LWP;use LWP::UserAgent;## Initialize objects#$ua = LWP::UserAgent->new;$ua->agent("Checkmap/1.0");my $req=HTTP::Request->new(GET => "http://sitemeter.com/?a=stats&s;=$username&r;=0");my $res = $ua->request($req);## Send a request and grab ...

Perl Script to check Google pagerank

http://digitalpbk.com/perl/perl-script-check-google-pagerank Perl Script to check Google pagerank In order to find out a Google Pagerank of a webpage, we can use the WWW::Google::PageRank module in Perl. Click WWW::Google::PageRank to download the Google Pagerank module. Here is a simple script that takes the Website URL as a command line argument and prints the Google PageRank. OR Alternatively you can install the module using cpan cpan -i WWW::Google::PageRank #!/usr/bin/perl $webpage = $ARGV[0]; use WWW::Google::PageRank; my $pagerank ...

yum/apt-get update Breaks Perl CPAN

http://digitalpbk.blogspot.com/2009/07/perl-update-code-500-architecture.html yum/apt-get update Breaks Perl CPAN Doing an yum update or apt-get update and upgrading your system might break the PERL installation, the output I got while doing so: (after an update).[root@desktop]# cpancpan shell -- CPAN exploration and modules installation (v1.7602)ReadLine support enabled cpan> install WWW::MechanizeCPAN: Storable loaded okGoing to read /root ...

Perl Script to Fetch PNR Status reservation on train from Indian Railways

http://digitalpbk.com/perl/script-fetch-pnr-status-reservation-train-indian-railways Perl Script to Fetch PNR Status reservation on train from Indian Railways The code below is a perl script that fetches the PNR status from the indianrail.gov.in website and displays it on the command line. Warning: No one is authorised to make any type of commercial usage like putting web advertisements or SMS service and Reproducing/Transmitting/Storing in its database, any content of www.indianrail.gov.in website, without prior written permission from Indian Railways. Violators ...