SSN Lookup Program

Announcing one of my latest utilities – SSN Lookup Program.

This program displays the state (in America) where the SSN was issued. The program will allow you to enter only the first 3 digits of the SSN – for safety reasons – and display the state.

SSN Lookup – Regular Version

SSN Lookup – iPhone/iPod Touch/iPad Version


December 2009 Web Server Survey – nginx grows


In the latest Netcraft December 2009 web server survey, Nginx web server showed a substantial growth of 0.53% since last month. Good news for Nginx users.

Most of the other web servers Apache, IIS, and lighttpd have a reduction in usage.

I’m a big fan of Nginx and use it on most of the development and production websites. Apart from the low memory footprint as compared to Apache’s huge memory consumption, web pages load on Nginx very fast.

Personally, I prefer Nginx taking all the HTTP load and proxying the PHP/Perl/Python requests to Apache. Other ways of running PHP and Perl scripts are by forwarding those requests to a FastCGI server.

I’ve also tried PHP-FPM on a development machine; PHP has to be patched and rebuilt for this. But since PHP-FPM has not been maintained for a while, I decided against using it for production servers. (Looks like they have made some progress with PHP-FPM).

Are you a new convert to Nginx? What do you like most about this webserver? Which method do you prefer for running PHP/Perl/Python scripts?

My Perl module – Twitter Badge

I wrote my first Perl module Twitter::Badge sometime back and just released version 0.02 with a minor change.

This module provides you with the API required to check any Twitter’s status and other details. The general procedure is something like this:

1. Install the Perl module with CPAN (Linux, Unix, or Mac) or PPM (if you use Windows).

Using CPAN, you have to do this:

perl -MCPAN -e shell

install Twitter::Badge

If you want to do it in one line:

perl -MCPAN -e 'install Twitter::Badge'

You can also download the source, and build the module with:

perl Makefile.PL


make install

2. After installing Twitter::Badge, test if its running with a simple example.

use Twitter::Badge;

# Try it with my Twitter ID
my $id = shift || 14512139;                   # define the Twitter ID
my $twitter = Twitter::Badge->new(id => $id); # create the object for that ID
$twitter->fetch();                            # get information for this ID

# Display status
print $twitter->name.' says - '.$twitter->text."\n"
    if defined $twitter->text;            # display status
print $twitter->name.' has '.$twitter->followers_count." followers\n"
    if defined $twitter->followers_count; # display follower count

You can find the complete documentation here.

This module is very basic right now and subject to change whenever Twitter changes its XML output.

The latest version of Twitter::Badge is 0.02. You may use it at your own risk.

Let me know if you would like any features added in this module.

UPDATE: I have a couple of screenshots (following Chittaranjan’s post) to help newbies use this module.

Screenshot 1

Twitter badge code

Screenshot 2 [execution]

Twitter badge execution

It can be used in any Perl script, either executed on the command line or for the web.

If you're a Perl developer or have developed simple CGI scripts, this will be a piece of cake for you.

Happy 20th Birthday Perl – Perl 5.10 released

Perl was released 20 years ago by Larry Wall, and as a treat, Perl5Porters have released the latest stable version of Perl 5.10.

Some of the new features in Perl 5.10 are named captures in regular expressions, state variables for subroutines, the defined-or operator, a switch statement and a faster regex engine. As a Perl lover, these new features are a great Christmas gift to me!

You can download the greatest scripting language in the world via Bittorrent.

Read more.