topic Re: Script for file name change in Operating System - HP-UX

Script for file name change

SKR_1 — Fri, 22 Aug 2008 16:33:46 GMT

Hi All,
I am seeking a URGENT help for changing the filenames ( almost 45000+)
I need a script which will change ( basically reduce) the filenames. My filnaming convention basically like the following
_.key
example of the filenames are following..

AQULEMPONesusyrloseK50SDS_AUSTRIAEnglish.key
AQUARECOnfjesseK50SDS_FINLANDFinnish.key
AMBELOndijsjd_THE_NETHERLANDSCzech.key
BLANOSERefinedCMC7H4XSDS_BULGARIAItalian.key

if you notice the second part of the file name have countryname and language name together. This is the area where we are trying to reduce the characters. Each country and name has to be shorten as per the given standard. some example given below.

Country substitutes:
AUSTRIA AT
BELGIUM BE
BULGARIA BG
CZECH CZ
DENMARK DK

Languages substitutes:
English E
German D
Italian I
Spanish S
Finnish U
so what I am expecting is the replace ment like in the bewlow example

Original file:
AMBERGUMTEMPROES_THE_NETHERLANDSEnglish.key
New file name:
AMBERGUMTEMPROES_THE_NLE.key

Can anyone please help me on this?

SKR

Re: Script for file name change

Tim Nelson — Fri, 22 Aug 2008 16:39:02 GMT

Why opening another one ???

Patience young grasshopper..

Here is one example of a way. Use a case statement for each lang, then instead of echoing use the mv command to rename.

ls /tmp/file*|while read file
do
case $file in
*nether*) NEW=`echo $file|sed -e s/nether_eng/NED_ENG/g'
echo $NEW;;
*) echo "no match"
esac
done

Re: Script for file name change

James R. Ferguson — Fri, 22 Aug 2008 16:47:36 GMT

Hi:

You could do this with 'sed'. For example:

# F=AQULEMPONesusyrloseK50SDS_AUSTRIAEnglish.key

# echo ${F}|sed -e 's/_AUSTRIA/_AT/;s/English.key/E.key/'
AQULEMPONesusyrloseK50SDS_ATE.key

Regards!

...JRF...

Re: Script for file name change

James R. Ferguson — Fri, 22 Aug 2008 16:50:54 GMT

Hi (again):

Of course, you don't say whether or not these filenames (all 45,000) are actually *files* you want to rename or are *filenames* in some file. Knowing that distinction would make the solution suggested easier.

Regards!

...JRF...

Re: Script for file name change

SKR_1 — Fri, 22 Aug 2008 16:54:53 GMT

Hi.. Thanks to all for the quick response.
They all are individual files stored under one directory. I want to rename these file names

Re: Script for file name change

SKR_1 — Fri, 22 Aug 2008 16:59:16 GMT

Hi
One more update
When we replace the country, sometime language will also get change.
for ex: if I want to change CZECHCzech.key, both will get replaced. What I need is CZECH( country name) should be replaced with CZ and Czech ( Language) with C
Note: All country names are in uppercase. while langaguages first character is uppercase and remining will be lower case.
ex.
CZECH - country name
Czech - language

Re: Script for file name change

Tim Nelson — Fri, 22 Aug 2008 17:12:29 GMT

How bout run it the first time to fix CZECH and then another time with mods to fix Czech ? ( too much brain power for a Friday to fix all options in one sweep)

Re: Script for file name change

James R. Ferguson — Fri, 22 Aug 2008 17:45:39 GMT

Hi (again):

> When we replace the country, sometime language will also get change.
for ex: if I want to change CZECHCzech.key, both will get replaced. What I need is CZECH( country name) should be replaced with CZ and Czech ( Language) with C

Consider:

# F=AQULEMPONesusyrloseK50SDS_CZECHCzech.key
# echo $F|sed -e 's/_CZECH/_CZ/;s/Czech.key/C.key/'
AQULEMPONesusyrloseK50SDS_CZC.key

Now, since you are acutally renaming files, Tim's initial approach is fine insofar as the driving code. Simply add a 'mv' of the original filename to the new filename.

Regards!

...JRF...

Re: Script for file name change

Dennis Handly — Sat, 23 Aug 2008 01:58:31 GMT

Basically as Tim and JRF have said, you can use sed(1) to change the names. (You may want to put some separator between the country and language so you could change them back.)

If you only have less than 100 changes, you can just use one long sed command or script file.
NEW=$(echo ${F} | sed -e 's/AUSTRIA/AT/' \
-e 's/BELGIUM/BE/' \
...
-e 's/English/_E/' \
...
)
(I inserted a "_" before the language.)

Then just:
mv $(F) $(NEW)

You may want to echo the above mv so you can check whether your script is correct.

Also, a meta question is: How do I write a script to write that sed script?
Give your above input in a file "map", you would write an awk script to turn it into the sed script file:
Country substitutes:
AUSTRIA AT
...

Languages substitutes:
English E
...

awk '
NF == 2 && $2 != "substitutes" {
print "s/" $1 "/" $2 "/"
}' map > sed_script_file

Then use "sed -f sed_script_file".

Re: Script for file name change

Hein van den Heuvel — Sat, 23 Aug 2008 02:40:04 GMT

I would do this with a perl script (some reader will not be surprised :-)...

For example:

---------- translate.pl ---------
use strict;
use warnings;
my %countries = qw(
AUSTRIA AT
BELGIUM BE
BULGARIA BG
CZECH CZ
DENMARK DK
NETHERLANDS NL
);

my %languages = qw(
English E
German D
Italian I
Spanish S
Finnish U
);

while (<>) {
chomp;
my $old = $_;
if (/_([A-Z]+)([A-Z][a-z]+)\./) {
my $country = $countries{$1};
my $language = $languages{$2};
if (!defined($country)) {
print STDERR "Unknown Country $1 from $old \n";
next
}
if (!defined($language)) {
print STDERR "Unknown Language $2 from $old \n";
next
}
my $new = $` . '_' . $country . $language . '.' . $';
print "rename $old, $new;\n";
}
}
----------------------

Using the files you list runs as:

$ ls tmp/*.key | perl translate.pl | more
Unknown Language Czech from tmp/AMBELOndijsjd_THE_NETHERLANDSCzech.key
Unknown Country FINLAND from tmp/AQUARECOnfjesseK50SDS_FINLANDFinnish.key
rename tmp/AQULEMPONesusyrloseK50SDS_AUSTRIAEnglish.key, tmp/AQULEMPONesusyrloseK50SDS_ATE.key;
rename tmp/BLANOSERefinedCMC7H4XSDS_BULGARIAItalian.key, tmp/BLANOSERefinedCMC7H4XSDS_BGI.key;

When you like what you see, change that last print statement into the real rename:
rename $old, $new;

Enjoy!
Hein.

Re: Script for file name change

Hein van den Heuvel — Sat, 23 Aug 2008 03:53:18 GMT

I meant to add a generic unrecognide file warning.

Change
rename $old, $new;
}

To
rename $old, $new;
} else {
print STDERR "Unrecognized file: $old\n"
}

fwiw... I thought it was a nice twist to be able to retain the suggested tables verbatim for inclusing in loading the translation array.

Hein.

Re: Script for file name change

SKR_1 — Mon, 25 Aug 2008 08:13:41 GMT

Thanks to all of you for helping me.

Thanks

SKR

Re: Script for file name change

Dennis Handly — Mon, 25 Aug 2008 21:16:09 GMT

>Thanks to all of you for helping me.

If you have gotten the answers you wanted, please read the following about assigning points and reopening threads:
http://forums.itrc.hp.com/service/forums/helptips.do?#33
http://forums.itrc.hp.com/service/forums/helptips.do?#41