Admission

opendir(DH,".");

 

for $sd (readdir DH) {

  	next if ($sd !~ /\./);

  	next if ($sd !~ /[a-z]/);

  	print "$sd backup ...\n";

  	`tar czf 20091119/20091119_$sd.tgz $sd`;

  	}

I admit it ... when it comes to the "crunch" and I need a quick script to do some systems admin work, it still has to be Perl!

The script above is currently running, via another window, on one of our two dedicated servers. "It's a very old machine - you should upgrade it" said their technician as he did a hard reboot for us yesterday; hmmm - it's not *that* old, but having heard a comment like that I think I'll ensure we have a fresh mirror of each virtual host ...

Learn how to write perl PROPERLY - i.e. commented, nicely structured, maintainable, without constants hard coded ... on our Perl Programming course. That will also equip you to write 'nasty' little scripts like the one above when you have the need!
(written 2009-11-19, updated 2009-11-20)

Associated topics are indexed as below, or enter http://melksh.am/nnnn for individual articles

Q102 - Choosing your language
  [76] Learning to program in - (2004-10-07)
  [1990] Speaking all the languages - (2009-01-12)
  [2001] I have not programmed before, and need to learn - (2009-01-19)
  [2048] Learning to program in PHP, Python, Java or Lua ... - (2009-02-19)
  [2535] When should I use Java, Perl, PHP, or Python? - (2009-12-13)
  [2536] All the Cs ... and Java too - (2009-12-13)
  [2700] The same very simple program in many different programming languages - (2010-03-31)
  [2866] Ruby - how does it compare and where is it the right language? - (2010-07-11)
  [3169] Rekeying a table - comparison in #Ruby #Perl and #Python - (2011-02-14)
  [3558] Python or Lua - which should I use / learn? - (2011-12-21)
  [3619] Ruby v Perl - a comparison example - (2012-02-21)
  [3764] Shell, Awk, Perl of Python? - (2012-06-14)
  [3785] Programming languages - what are the differences between them? - (2012-06-27)

Back to
Good example of recursion in Python - analyse an RSS feed

Previous and next
or
Horse's mouth home

Forward to
Community Area Partnership - inaugural AGM

Some other Articles

The story of the railway land at Melksham Station
The music of the stock market
A life lesson from the accuracy of numbers in Excel and Lua
Community Area Partnership - inaugural AGM
Admission
Good example of recursion in Python - analyse an RSS feed
I almost put the bins out this morning
Learning to program in ...
Melksham manslaughter case concludes - sort of
Monday night, Tuesday night