Oracle-L: Perl Breakdown

From: Post, Ethan <Ethan.Post_at_ps.net>
Date: Fri, 24 Jan 2003 15:04:51 -0800
Message-ID: <F001.0053A346.20030124150451@fatcity.com>

This will make Jared happy, I finally broke down and fumbled my way through some perl.

function f_file_date {

   {
   print "#!/usr/bin/perl"
   print "print scalar(localtime((stat(\"${1}\"))[9]))"
} > tmp.pl

   perl tmp.pl
   rm tmp.pl
}

This little diddy can be placed right in my .ksh script to get file modification times in a consistent format, I wanted to use "ls -l" but then it occurred to me that once the year changes the "ls -l" returns a different formatted date entry for files modified during the last year. Maybe someone can suggest a prettier method of doing this within a .ksh script without calling another script.

Ethan -- Please see the official ORACLE-L FAQ: http://www.orafaq.net -- Author: Post, Ethan INET: Ethan.Post_at_ps.net

Fat City Network Services    -- 858-538-5051 http://www.fatcity.com
San Diego, California        -- Mailing list and web hosting services
---------------------------------------------------------------------

To REMOVE yourself from this mailing list, send an E-Mail message to: ListGuru_at_fatcity.com (note EXACT spelling of 'ListGuru') and in the message BODY, include a line containing: UNSUB ORACLE-L (or the name of mailing list you want to be removed from). You may also send the HELP command for other information (like subscribing). Received on Fri Jan 24 2003 - 17:04:51 CST