Thanks again Chubler_XL for your inputs, i really appreciate it.
so basically, the arguments would be like this:
$1 = ft-gnct-3398-cd-2012-07-07-140112.txt.gz (1st filename)
$2 = " "
$3 = 22,23,1,2,4
$4 = the 2nd filename separated by a space from the $3? , right?
i'm trying to understand each code that you posted, so i apologize if i ask too many questions ok.
so this Begin statement -- it just basically separates the CSV into different columns, right? (will it also split it into different arguments as well?)
Though, i'm not really familiar with the split command, so i'm not sure if i understood it correctly yet...
col_list should have 5 columns right? --> $3 = 22,23,1,2,4
do we need to add in this like this?
BEGIN {
cols=split(col_list, col, ",");
split("sales_date,cust_id,UPC", titles, ",")
}
and also in these code below:will this take the first column of the second file and compare to $7, which i think is now.. only part of $3 (csv), right?
Code:
FILENAME != "-" {EXC[$1]; next}
!($7 in EXC)
so in this added code, i'm not quite sure what it does?
i have the following perl script.but it searches for a given filename.
i want to run the same script in my directoy which has subdirectories too and it has to display the file if sreach satisfies along with directory name.
can anyone help me:
perl script:
my $FILE = $ARGV;
for zf in... (4 Replies)
Hi All
I have files contains rows which look like this:
2 20090721_16:58:47.173 JSUD2 JD1M1 20 IAM 966591835270 249918113182 b 3610 ACM b 3614 ACM b 3713 CPG b 3717 CPG f 5799 REL b 5815 RLC b 5817 RLC :COMMA: NCI=00,FCI=6101,CPC=0A,TMR=00,OFI=00,USI: :COMMB: BCI=1234: :RELCAUSE:10:
... (1 Reply)
Hi all
Iam very new to Shell Scripting, I have to modify a shell script looking at an existing one except that it will query against some table X in A database.
Befor Spooling check if there are any reload files if there archive the files.
The above scipt executes some abc.sql which will b a new... (2 Replies)
Hello Team,
I have prepared script which will check for listening message for ports 1199,1200 and 1201. I need modifcation in script in such a way that if port 1200 is not listening then it should message rmi port 1200 is not listening. Smap for port 1199 and 1201.
kindly guide me to acheive... (4 Replies)
I want the below script to omit every chunk of data that contains a specific hostname.
here's the scenario. i have a configuration file that contains the configuration of several hosts. a sample of this configuration file is this:
define host {
address ... (12 Replies)
Hi
I have some list of files in a .dat
i need to read them line by line and assing them to variables.
For ex: list of files are some,some1
i need two variables g1 as some and g2 as some1.
and then need to perform some operations on g1 and g2
for which i can get some o/p, i need to capture... (2 Replies)
Hi,
I have below script, i want to monitor that that ntp server listed in setting is under sync or not. I wrote below script but it is not working properly.
Here are problems, first it should server under sync if "*" shows and rest if shows "+" it means it is next server in waiting list.... (4 Replies)
Hi All,
In the below script, I am calling one sql file test.sql If this file returns any data then I have to generate this file test_$RUN_DATE.FCNA If the sql files returns no data then I dont want to generate this file test_$RUN_DATE.FCNA.
I tried one approach like: check the size of FCNA files... (1 Reply)
Discussion started by: praveenk768
1 Replies
LEARN ABOUT DEBIAN
locale::currency
Locale::Currency(3perl) Perl Programmers Reference Guide Locale::Currency(3perl)NAME
Locale::Currency - standard codes for currency identification
SYNOPSIS
use Locale::Currency;
$curr = code2currency('usd'); # $curr gets 'US Dollar'
$code = currency2code('Euro'); # $code gets 'eur'
@codes = all_currency_codes();
@names = all_currency_names();
DESCRIPTION
The "Locale::Currency" module provides access to standard codes used for identifying currencies and funds, such as those defined in ISO
4217.
Most of the routines take an optional additional argument which specifies the code set to use. If not specified, the default ISO 4217
three-letter codes will be used.
SUPPORTED CODE SETS
There are several different code sets you can use for identifying currencies. The ones currently supported are:
alpha
This is a set of three-letter (uppercase) codes from ISO 4217 such as EUR for Euro.
Two of the codes specified by the standard (XTS which is reserved for testing purposes and XXX which is for transactions where no
currency is involved) are omitted.
This code set is identified with the symbol "LOCALE_CURR_ALPHA".
This is the default code set.
num This is the set of three-digit numeric codes from ISO 4217.
This code set is identified with the symbol "LOCALE_CURR_NUMERIC".
ROUTINES
code2currency ( CODE [,CODESET] )
currency2code ( NAME [,CODESET] )
currency_code2code ( CODE ,CODESET ,CODESET2 )
all_currency_codes ( [CODESET] )
all_currency_names ( [CODESET] )
Locale::Currency::rename_currency ( CODE ,NEW_NAME [,CODESET] )
Locale::Currency::add_currency ( CODE ,NAME [,CODESET] )
Locale::Currency::delete_currency ( CODE [,CODESET] )
Locale::Currency::add_currency_alias ( NAME ,NEW_NAME )
Locale::Currency::delete_currency_alias ( NAME )
Locale::Currency::rename_currency_code ( CODE ,NEW_CODE [,CODESET] )
Locale::Currency::add_currency_code_alias ( CODE ,NEW_CODE [,CODESET] )
Locale::Currency::delete_currency_code_alias ( CODE [,CODESET] )
These routines are all documented in the Locale::Codes man page.
SEE ALSO
Locale::Codes
Locale::Constants
http://www.iso.org/iso/support/currency_codes_list-1.htm
The ISO 4217 data.
AUTHOR
See Locale::Codes for full author history.
Currently maintained by Sullivan Beck (sbeck@cpan.org).
COPYRIGHT
Copyright (c) 1997-2001 Canon Research Centre Europe (CRE).
Copyright (c) 2001 Michael Hennecke
Copyright (c) 2001-2010 Neil Bowers
Copyright (c) 2010-2011 Sullivan Beck
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2011-09-26 Locale::Currency(3perl)
08-28-2012
