Category Archives: Perl

Perl – Writing the Linux ‘cat’ Utility

The below Perl code will give you similar results compared to the Linux ‘cat’ utility. At the command prompt, just enter “perl [scriptname] [filename1] [filename2] etc …

Posted in Perl, Programming Languages, Technology | Tagged , , , , , , | Leave a comment

Perl – File-Test Operators

In Perl, file-test operators are useful for determining the status of a file. Some of the operators below refer to the “real user” which is the User ID specified at login rather than “effectve User ID” which refers to the … Continue reading

Posted in Perl, Programming Languages, Technology | Tagged , , , , , , , , | Leave a comment

Perl – Converting the Time from 24 hr to 12 hr Format

Below is a Perl script that demonstrates how to appropriately convert the current time from 24 hr format to 12 hr format. The ‘convertToTwelveHr’ subroutine does all the work here. The 24 hr input value is passed into the subroutine … Continue reading

Posted in Perl, Programming Languages, Technology | Tagged , , , , , , , , , | Leave a comment

Perl – merging files

Below I demonstrate a quick method of merging two files into a third file using Perl. The program merges two files together into a third file by writing one line from file one to file three and then writing one … Continue reading

Posted in Perl, Programming Languages | Tagged , , , , , | Leave a comment

Perl – Initial Values and Context Based Evaluation

It’s important to remember that in Perl all scalar variables have an initial value of the null string, “”. You do not need to define a value for scalar variables unless you are using “strict” mode. Knowing this, what do … Continue reading

Posted in Perl, Programming Languages, Technology | Tagged , , , , , , , | Leave a comment

Screen Scraping with Perl to get the top 25 Websites and the Web Servers they use

This was a really fun little script I wrote that I thought I would share with everyone. I basically wrote a Perl script using the popular LWP Perl module to screen scrape and obtain the top 25 sites and the … Continue reading

Posted in Data Mining, Hacks, Perl, Programming Languages, Technology | Tagged , , , , , , , , , , , , , , , , , , , , , , , , | 3 Comments

Perl – Get files and directories with the glob function

Recently, as part of a larger Perl application, I had to get all the files and sub-directories of the working directory. Using the built-in ‘glob’ function, I was able to quickly implement a subroutine to do this and also differentiate … Continue reading

Posted in Perl, Programming Languages | Tagged , , , , , , , | 3 Comments

Use Perl’s regex to count the # of words in a file

In the below code I use Perl’s regex capabilites to count the # of words in a file. Notice I used “\s” in the regex expression to account for not only spaces but also tab and new line characters. In … Continue reading

Posted in Perl, Programming Languages | Tagged , , , , , , , , , , , , , , , , , | Leave a comment

Scalar and List Contexts in Perl

One of the most important concepts to understand in Perl programming is that of evaluation based on context. In Perl, an operation such as an assignment or function call can give two different results based on the context of the … Continue reading

Posted in Perl, Programming Languages | Tagged , , , , , , , , , , , | Leave a comment

How Perl/Python Scripts on Force10 S60 Switches Can Access the Internet

Let’s say you have a Force10 S60 switch [FTOS 8.3.3.4] hooked-up at a datacenter that currently has a console connection connected to a management switch that provides external Internet access. The natted IP address is 10.0.8.10/24 and the external IP … Continue reading

Posted in Force10 Networks, Labs, Networking, Perl, Programming Languages, Python, Technology | Tagged , , , , , , , , , , , , , , , , | Leave a comment