Sponsored Content
Top Forums Shell Programming and Scripting PERL : Read an array and write to another array with intial string pattern checks Post 302570990 by ahamed101 on Saturday 5th of November 2011 07:50:13 AM
Old 11-05-2011
Try this...
Code:
#!/usr/bin/perl

@values = ("2011_11_05", "2011_11_04" , "2011_11_03");
my $filename = 'abc_yyyy_mm_dd';
my $datevar ='yyyy_mm_dd';
if ($filename =~ $datevar)
{
        $val=substr($filename,0,index($filename,$datevar));
        foreach (@values){
                push(@file_date,$val.$_);       
        } 
}

foreach $v (@file_date){
        print $v,"\n";
}

--ahamed
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

perl -write values in a file to @array in perl

Hi can anyone suggest me how to write a file containing values,... say 19 20 21 22 .. 40 to an array @array = (19, 20, ... 40) -- Thanks (27 Replies)
Discussion started by: meghana
27 Replies

2. Shell Programming and Scripting

Perl: Read directories and assign to array

I would like to read directories and assign to an array where the user can select a directory from the output. For example, a dir list will populate with a number assigned to each dir. I would like to ask the user to select the dir they want. TIA, I don't know what this would be called so I... (2 Replies)
Discussion started by: man
2 Replies

3. Shell Programming and Scripting

search of string from an array in Perl

Hi All I want to search a string from an array in Perl. If a match occurs, assign that string to a variable else assign 'No match'. I tried writing the script as follows but it's in vain. Please help me.. #!/usr/bin/perl use strict; my $NER; my @text=("ORG","PER"); ... (4 Replies)
Discussion started by: my_Perl
4 Replies

4. Shell Programming and Scripting

Perl:Use of array elements in pattern matching

I need to use array elements while pattern matching. @myarr = (ELEM1, ELEM2, ELEM3); following is the statement which I am using in my code. Basically I want to replace the ELEM1/2/3 with other thing which is mentioned as REPL here. if (condition) { s/(ELEM1|ELEM2|ELEM3): REPL: /; } I... (3 Replies)
Discussion started by: deo_kaustubh
3 Replies

5. Shell Programming and Scripting

Perl Array / pattern match large CPU usage

Hi, I have one file in this format 20 value1 33 value2 56 value3 I have another file in this format: 34,30-SEP-09,57,100237775,33614510126,2,34 34,30-SEP-09,57,100237775,33620766654,2,34 34,30-SEP-09,108,100237775,33628458122,2,34 34,30-SEP-09,130,100237775,33635266741,2,254... (6 Replies)
Discussion started by: Donkey25
6 Replies

6. Shell Programming and Scripting

perl, put one array into many array when field is equal to sth

Hi Everyone, #!/usr/bin/perl use strict; use warnings; my @test=("a;b;qqq;c;d","a;b;ggg;c;d","a;b;qqq;c;d"); would like to split the @test array into two array: @test1=(("a;b;qqq;c;d","a;b;qqq;c;d"); and @test2=("a;b;ggg;c;d"); means search for 3rd filed. Thanks find the... (0 Replies)
Discussion started by: jimmy_y
0 Replies

7. Shell Programming and Scripting

Perl and string array problem

#!/usr/bin/perl my @arr=("hello", "how", "are", "you"); $l=length(@arr); print $l; This print 1.Why? How can i print the array size = 4? I want to store these in an array. hello how are you And then i want to access these element through indexing. How can i do this? (4 Replies)
Discussion started by: cola
4 Replies

8. Shell Programming and Scripting

[Perl] Sorting an String-Array

Hi, i have a txtfile with the format <Nr>tab<word>tab<other stuff>new line and i want to sort the <word>-colum with a perl script. My textfile: <Nr>tab<word>tab<other stuff>new line 6807 die ART.Acc.Sg.Fem 6426 der ART.Gen.Sg.Fem 2 die ART.Nom.Sg.Fem 87 auf APPR.-- 486 nicht PTKNEG.--... (1 Reply)
Discussion started by: buckelede
1 Replies

9. Shell Programming and Scripting

perl: Read array from a flat file

Hello Guru's I want to read an array into a flatfile Please let me know how to do the same So far this the below code use strict; use warnings; open (my $data , '<', $ARGV)|| die "could not open $ARGV:\n$!"; my @array=(<$data>); my @sorted=sort... (8 Replies)
Discussion started by: Pratik4891
8 Replies

10. Shell Programming and Scripting

Perl string formation from array

HI I ma using perl programming my perl is like this $InputFile = $ENV{UDE_TMP} . "/" ."cre_fmr_gen.temp_data_file_gen.dat"; @duplicates = `cat $InputFile | cut -d "|" -f 1,1 | sort | uniq -c | awk '{ if(\$1>1) {print \$2;}}'`; my $cusiplist ; foreach $cusip (@duplicates) {... (1 Reply)
Discussion started by: ptappeta
1 Replies
ASNTOOL(1)						     NCBI Tools User's Manual							ASNTOOL(1)

NAME
asntool - process ASN.1 module specifications SYNOPSIS
asntool [-] [-B filename] [-D N] [-G] [-I str] [-J type] [-K str] [-L str] [-M filename,...] [-P str] [-Q] [-S filename] [-T filename] [-V] [-X filename] [-Z] [-b N] [-d filename] [-e filename] [-f filename] [-l filename] -m filename [-o filename] [-p filename] [-t str] [-v filename] [-w N] [-x filename] DESCRIPTION
asntool reads, validates, and displays ASN.1 module specifications. OPTIONS
A summary of options is included below. - Print usage message -B filename Generate objects and code in files named filename.* -D N Debugging level for code generation: 0 No debugging (default) 1 Shallow debugging 2 Deep debugging 3-9 Same as 2 -G Generate object loader .c and .h files -I str Put "#include str" in generated .c file -J type Register type type with object manager -K str In generated .c, force name of #included asn header to str -L str Label registered type as str -M filename,... Search the ASN.1 modules in filename,... for external references -P str XML module prefix for DOCTYPE -Q Use quoted syntax form for generated include files -S filename Send debugging output to filename rather than stderr -T filename Dump ASN.1 tree to filename -V Force CHOICE objects to use custom structures rather than ValNodePtrs, for compatibility with some old hand-coded object loaders. -X filename Write XML DTD to filename. If filename is "m", print each module to a separate file. -Z Bit twiddle for optional zero value base slots -b N Use N-byte buffers (default = 1024; anything between 512 and 10000 is legal) -d filename Read binary values from filename (requires -t) -e filename Write binary values to filename -f filename Write ASN.1 module to filename -l filename Write ASN.1 loader to filename -m filename Read ASN.1 module from filename -o filename Write header to filename -p filename Write print values to filename -t str Expect binary values to have type str -v filename Read print values from filename -w N Limit values in #defines to N bits (default = 31; anything between 31 and 128 is legal) -x filename Write XML data to filename AUTHOR
The National Center for Biotechnology Information. NCBI
2010-09-01 ASNTOOL(1)
All times are GMT -4. The time now is 10:09 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy