Sorry, hope no one minds the linux question here, I use both unix and linux, and have come across a problem. On my linux box i have a dual boot, and i've set it up so i can access my windows data partition while in linux mode (mount the vfat partition), but linux doesn't recognize long file names,... (2 Replies)
Hi,
I need to create recursive tar archive, while I put there only files of type a*.txt.
Without file filtering the command is: tar cfzf test.tar.gz test_tar/
How I include the switch for including only files with pattern a*.txt ?
Thanks a lot! (1 Reply)
I think this is a very challenging problem I am facing and I have no idea how to deal with it
Suppose I have two csv files
A.csv
Toyota Camry,1998,blue
Honda Civic,1999,blue
B.csv
Toyota Inc. Camry, 2000km
Honda Corp Civic,1500km
I want to generate C.csv
Toyota Camry,1998,blue... (7 Replies)
Hello respected members,
I have a file wich has several fields separated by space. I want to remove all the fields which are not the client_name.
I mean the field which are not "pfizer","csx" and "mafoi". And the deletion action will be taken place from the 3rd field(including the third... (2 Replies)
Sun Solaris Unix Question
Haven't been able to find any solution for this situation. Let's just say the file names listed below exist in a directory. I want the find command to find all files in this directory but at the same time I want to eliminate certain file names or files with certain... (2 Replies)
When I try with patern matching in a file with below code works
cat scj_drive_commands | egrep '/app/oracle/build_lib/pkg32|/app/oracle/build_lib/pkg33'
But when I have code with patern searching using of below does not work !
cat scj_drive_commands | egrep... (3 Replies)
not getting anywhere with this
an xml file contains multiple clients set up with same tags, different values.
I need to parse the file for client foo, and change the value of tag "64bit" from false to true.
cat clients.xml
<Client type"FIX">
<ClientName>foo</ClientName>... (3 Replies)
I found this command and would like to know what it means:
gawk 'NR==1{for(i=1;i<=NF;i++)if($i~/FE/)f=i}{for(i=0;i<n;i++)printf"%s%s",i?" ":"",$f;print""}'
It seems to mean if the row =1 assign i to that row, and then if FE is in the top row /column then increment and print the row.
I am... (2 Replies)
Data files coming in different names in a file name called process.txt.
1. shipments_yyyymmdd.gz
2 Order_yyyymmdd.gz
3. Invoice_yyyymmdd.gz
4. globalorder_yyyymmdd.gz
The process needs to discard all the below files and only process two of the 4 file names available
... (1 Reply)
I am trying to create a cronjob that will run on startup that will look at a list.txt file to see if there is a later version of a database using database.txt as the source. The matching lines are written to output.
$1 in database.txt will be in list.txt as a partial match. $2 of database.txt... (2 Replies)
Discussion started by: cmccabe
2 Replies
LEARN ABOUT DEBIAN
algorithm::checkdigits::mbase_002
CheckDigits::MBase_002(3pm) User Contributed Perl Documentation CheckDigits::MBase_002(3pm)NAME
CheckDigits::MBase_002 - compute check digits for blood bags (DE), BZUe (DE), VAT Registration Number (DE)
SYNOPSIS
use Algorithm::CheckDigits;
$bb = CheckDigits('blutbeutel');
if ($bb->is_valid('2761011234567893')) {
# do something
}
$cn = $bb->complete('276101123456789');
# $cn = '2761011234567893'
$cd = $bb->checkdigit('2761011234567893');
# $cd = '3'
$bn = $bb->basenumber('2761011234567893');
# $bn = '276101123456789';
DESCRIPTION
ALGORITHM
1. Start with values P = 10, S = 0.
2. Beginning left you do the following for all digits
1. S = (P + digit) modulo 10
2. If S is 0 then S = 10.
3. P = (2 * S) modulo 11
3. The check digit is (11 - P) modulo 10.
METHODS
is_valid($number)
Returns true only if $number consists solely of numbers and the last digit is a valid check digit according to the algorithm given
above.
Returns false otherwise,
complete($number)
The check digit for $number is computed and concatenated to the end of $number.
Returns the complete number with check digit or '' if $number does not consist solely of digits and spaces.
basenumber($number)
Returns the basenumber of $number if $number has a valid check digit.
Return '' otherwise.
checkdigit($number)
Returns the checkdigit of $number if $number has a valid check digit.
Return '' otherwise.
EXPORT
None by default.
AUTHOR
Mathias Weidner, <mathias@weidner.in-bad-schmiedeberg.de>
SEE ALSO
perl, CheckDigits, www.pruefziffernberechnung.de, www.eurocode.org.
perl v5.10.0 2008-05-17 CheckDigits::MBase_002(3pm)