KevinADC

•

What is DaniWeb IT Discussion Community?

DaniWeb is a massive community of 427,072 software developers, web developers, Internet marketers, and tech gurus who are all enthusiastic about making contacts, networking, and learning from each other. In fact, there are 2,385 IT professionals currently interacting right now! Registration is free, only takes a minute and lets you enjoy all of the interactive features of the site.

Join our community!

•

Code Snippets By: KevinADC

Page 1 of 2

Remove Duplicate Lines from a File in perl

A bare-bones code snippet to remove duplicate lines from a file. There are a number of ways to accomplish this task but this is a fast and dependable method using perls inplace editor and a simple hash to get the job done. This probably should not be used for really big files, but files with a... (View Snippet)

Search and Replace Script in perl

This is a bare-bones search and replace script that uses perls in-place editor and the File::Find module to get the job done quickly. It will search in all sub directories of the start directory and find and replace the text you specify in the type of file you specify. Keep in mind, this is a... (View Snippet)

Calculate day of the week for a given date MM-DD-YYYY in perl

Given the date in mm-dd-yyyy (or M-D-YYYY) format (or any combination of that format) you can find out what day of the week that was on or is on or will be on, within the limitations of the system the script resides on. This snippet uses only core functions and modules so nothing needs to be... (View Snippet)

Remove leading and trailing white space from a string in perl

This is a routine task best done with two regexp's when using perl. (View Snippet)

Adding commas to numbers in perl

Convert 1000000 into 1,000,000 using a perl regexp. (View Snippet)

Shuffling an array randomly in perl

Use the List::Util module. I believe List::Util is a core module starting with perl 5.8. For older versions of perl you may need to install the module. See the module documentation for more details: List::Util (View Snippet)

Expanding variables in single-quoted strings. in perl

I've seen this question (or similar) asked many times on forums: I have a variable in a file (text) and want to expand it. For example, I have this line in a text file: Mary had a little $lamb and I want to be able to expand $lamb but text files are treated as single-quoted strings and perl... (View Snippet)

Process all possible permutations of a list in perl

"How can I find all the permutations of a list (or a word)"? I have seen this question asked a number of times on forums. There is a module that makes this task very easy: List::Permutor. It is not a core module so you may need to install it. See module for more details: List::Permutor (View Snippet)

Check if an email address is well-formed in perl

You will need to install the Email::Valid module if it's not already installed. See the module documentation for further details. Email::Valid (View Snippet)

Random Password Generator in perl

Code snippet to generate random passwords. Avoids using confusing characters such as lower case L (l) and the number one (1), the letter 'O' and the number zero. Upper-case alpha characters could be added to the character set if mixed-case passwords are desired. (View Snippet)