perl -p -i -e 's/(.)$/$1$1/g' filename
This changed my nonsense file:
ghggk dethaks gjfkdld fyduftsdu flkgjd kflgjlk flkgjl f
into a slightly different nonsense file:
ghggkk dethakss gjfkdldd fyduftsduu flkgjd kflgjlk flkgjl ff Feeds
Links
Pages
Categories
Tag Cloud
acrobat reader backups blog blogger bot cisco dd image debian defense dns email emet encryption evil bits exploits facebook gcih google gpen gsutil iptables java linux live view mail malware metasploit microsoft windows netflow obfuscation photo gallery php physical security python sans shell scripting silk social networking squid proxy truecrypt vmdk vmware vulnerability scanning wordpress xenArchives
- February 2012
- December 2011
- October 2011
- August 2011
- July 2011
- June 2011
- April 2011
- March 2011
- January 2011
- November 2010
- August 2010
- May 2010
- February 2010
- January 2010
- December 2009
- October 2009
- September 2009
- May 2009
- March 2009
- February 2009
- January 2009
- December 2008
- October 2008
- September 2008
- August 2008
- July 2008
- May 2008
- March 2008
- February 2008
- January 2008
- May 2007
- March 2007
- February 2007
- December 2006
- October 2006
- September 2006
- August 2006
- April 2006
- March 2006
- February 2006