Sponsored Content
Top Forums Shell Programming and Scripting Capture the last record number using "awk" NR variable Post 302991248 by zaxxon on Wednesday 8th of February 2017 08:52:13 AM
Old 02-08-2017
The number of records which is NR contains the current line number. awk has an END{} block, where when it is reached NR will have the number 21 as value in your case.
Anyway, I second what the others say, that the least complex tool needed to do the job might be the tool of choice.

If I got it right, you just want to read an input file and do something with every line.

This could generally also be done with something like this:

Code:
while read LINE; do
    echo $LINE
done < infile

...where the echo could be something else of course.
This way you don't even need to know how many lines you have to use it in a for-loop, as it cycles over every line anyway.
This User Gave Thanks to zaxxon For This Post:
 

10 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

How to count number of occurrences of a "|" from a variable?

I have a variable, var="some1|some2|some3" I want to know how many "|" are in $var. When I say echo $var | grep -c '|' I am getting only 1 :confused: :confused: :confused: ? (4 Replies)
Discussion started by: jingi1234
4 Replies

2. Shell Programming and Scripting

How do "if [ $variable -eq "a number" ] ?

In particular I'm trying to check if a line contains an IP address and then do something with it. The file contains some lines that have no numbers, some blank lines, and some lines with only IP addresses. #!/bin/bash touch file2.txt cat file1.txt | \ while read line do if *.*.*.* ];... (4 Replies)
Discussion started by: earnstaf
4 Replies

3. UNIX for Dummies Questions & Answers

Explain the line "mn_code=`env|grep "..mn"|awk -F"=" '{print $2}'`"

Hi Friends, Can any of you explain me about the below line of code? mn_code=`env|grep "..mn"|awk -F"=" '{print $2}'` Im not able to understand, what exactly it is doing :confused: Any help would be useful for me. Lokesha (4 Replies)
Discussion started by: Lokesha
4 Replies

4. Shell Programming and Scripting

Sed - How to escape variable number of "/" (slash) ?

Hi, Can you tell me how to escape a variable number of slash characters in sed "/" ? In the script the code looks like this: cat $file_to_update | sed s/^$param/$param=$tab2*\#\*/1 And the $tab2 value is a path so it will have a number of "/" charracters. # cat db.cfg | sed... (4 Replies)
Discussion started by: majormark
4 Replies

5. Shell Programming and Scripting

help for saving vertical datas to horizontal with "awk" or "cut"

hi, i have a file having datas like that ./a.txt 12344 12345 12346 12347 ..... ..... ... i want to save this datas to another file like that ./b.txt 12344 12345 12346 12347 ... ... ... i think awk can make this but how? :) waiting for ur help. (3 Replies)
Discussion started by: mercury
3 Replies

6. Shell Programming and Scripting

cat $como_file | awk /^~/'{print $1","$2","$3","$4}' | sed -e 's/~//g'

hi All, cat file_name | awk /^~/'{print $1","$2","$3","$4}' | sed -e 's/~//g' Can this be done by using sed or awk alone (4 Replies)
Discussion started by: harshakusam
4 Replies

7. Shell Programming and Scripting

awk command to replace ";" with "|" and ""|" at diferent places in line of file

Hi, I have line in input file as below: 3G_CENTRAL;INDONESIA_(M)_TELKOMSEL;SPECIAL_WORLD_GRP_7_FA_2_TELKOMSEL My expected output for line in the file must be : "1-Radon1-cMOC_deg"|"LDIndex"|"3G_CENTRAL|INDONESIA_(M)_TELKOMSEL"|LAST|"SPECIAL_WORLD_GRP_7_FA_2_TELKOMSEL" Can someone... (7 Replies)
Discussion started by: shis100
7 Replies

8. Shell Programming and Scripting

how to use "cut" or "awk" or "sed" to remove a string

logs: "/home/abc/public_html/index.php" "/home/abc/public_html/index.php" "/home/xyz/public_html/index.php" "/home/xyz/public_html/index.php" "/home/xyz/public_html/index.php" how to use "cut" or "awk" or "sed" to get the following result: abc abc xyz xyz xyz (8 Replies)
Discussion started by: timmywong
8 Replies

9. Shell Programming and Scripting

Variable interpolation in "print" of awk command

Hi, I have a snippet like below. Based on variable i, i wish to print 1,2,3,4,5th columns to Sample files. For each loop, one column from contetn and results will be pused to sample files. But i have a problem here i=1 while ; do `awk -F"\t" '{print $($i)}' $content > Sample_${i}_original`;... (4 Replies)
Discussion started by: forums123456
4 Replies

10. Shell Programming and Scripting

awk variable into shell command "date -d": possible...?

Hello, there! I am trying to pass an awk variable into a shell command in order to collect the result into an awk variable; in Bash it does work, as in: v='2'; date -d "now + $v weeks" But in awk it does not, as in: v="2" "date -d 'now + v weeks'" | getline newdate close ("date -d 'now... (3 Replies)
Discussion started by: fbird3
3 Replies
Bio::Tools::Run::Phylo::PAML::Baseml(3pm)		User Contributed Perl Documentation		 Bio::Tools::Run::Phylo::PAML::Baseml(3pm)

NAME
Bio::Tools::Run::Phylo::PAML::Baseml - Wrapper aroud the PAML program baseml SYNOPSIS
use Bio::Tools::Run::Phylo::PAML::Baseml; use Bio::AlignIO; my $alignio = Bio::AlignIO->new(-format => 'phylip', -file => 't/data/gf-s85.phylip'); my $aln = $alignio->next_aln; my $bml = Bio::Tools::Run::Phylo::PAML::Baseml->new(); $bml->alignment($aln); my ($rc,$parser) = $bml->run(); while( my $result = $parser->next_result ) { my @otus = $result->get_seqs(); my $MLmatrix = $result->get_MLmatrix(); # 0 and 1 correspond to the 1st and 2nd entry in the @otus array } DESCRIPTION
This is a wrapper around the baseml program of PAML (Phylogenetic Analysis by Maximum Likelihood) package of Ziheng Yang. See http://abacus.gene.ucl.ac.uk/software/paml.html for more information. This module will generate a proper baseml.ctl file and will run the program in a separate temporary directory to avoid creating temp files all over the place and will cleanup after itself.. The values you can feed to the configuration file are documented here. 'noisy' => [ 0..3,9], 'verbose' => [ 0,1,2], # 0:concise, 1:detailed, 2:too much 'runmode' => [0..5], # for runmode # 0: use the provided tree structure(s) in treefile # 1,2: mean heuristic search by star-decomposition alg # 2: starts from star tree while 1 reads a multifurcating # tree from treefile and ties to estimate the best # bifurcating tree # 3: stepwise addition # 4: NNI perturbation with the starting tree # Tree search DOES NOT WORK WELL so estimate a tree # using other programs first 'model' => '0', # for model # 0: JC69 (uncorrected) # 1: K80 (transitions/transversion weighted differently) # 2: F81 # 3: F84 # 4: HKY85 # 5: T92 (Tamura 92) # 6: TN93 (Tajima-Nei) correct for multiple substitutions # 7: REV (aka GTR) # 8: UNREST # 9: REVu #10: UNRESTu # See Yang 1994 JME 39:105-111 # model 8 special case of the REV model # model 9 is special case of unrestricted model # can also supply special rate parameters # so for example (from pamlDOC.pdf # $model = '8 [2 (CT) (AG)]'; # TN93 # $model = '8 [2 (TA AT TG CA CG) (AG)]'; # TN93 # $model = '9 [1 (TC CT AG GA)]; # K80 # $model = '9 [0]'; # JC69 # $model = '9 [11 (TA) (TG) (CT) (CA) (CG) (AT) (AC) (AG) (GT) (GC) (GA)], 'outfile' => 'mlb', 'fix_kappa'=> [0,1], # 0:estimate kappa, 1:fix kappa 'kappa' => '2.5', # initial or fixed kappa 'fix_alpha'=> [1,0], # 0: estimate gamma shape param # 1: fix it at alpha 'alpha' => '0', # initial of fixed alpha # 0: infinity (constant rate) 'Malpha' => [0,1], # different alphas for genes 'fix_rho'=> [1,0], # 0: estimate gamma shape param # 1: fix it at alpha 'rho' => '0', # initial of fixed alpha # 0: infinity (constant rate) 'ncatG' => '5', # number of categories in the dD,AdG, or nparkK models of rates 'nparK' => [0..4], # rate-class models # 1:rk 2:rk&fK # 3:rK&MK(1/K) 4:rK&MK 'nhomo' => [0..4], # 0 & 1: homogeneous, # 2: kappa for brances # 3:N1 4:N2 'getSE' => [0,1], 'RateAncestor' => [1,0,2], # rates (alpha > 0) or # ancestral states 'cleandata' => [1,0], # remove sites with # ambiguity data (1:yes or 0:no) 'fix_blength' => [-1,0,1,2], # 0: ignore, -1: random, # 1: initial, 2: fixed # 'icode' => [ 0..10], # (with RateAncestor=1. #try "GC" in data,model=4,Mgene=4) 'ndata' => [5,1..10], 'clock' => [0..3], # 0: no clock, 1: clock, 2: local clock, 3: CombinedAnalysis 'Small_Diff' => '1e-6', #underflow issues? FEEDBACK
Mailing Lists User feedback is an integral part of the evolution of this and other Bioperl modules. Send your comments and suggestions preferably to the Bioperl mailing list. Your participation is much appreciated. bioperl-l@bioperl.org - General discussion http://bioperl.org/wiki/Mailing_lists - About the mailing lists Support Please direct usage questions or support issues to the mailing list: bioperl-l@bioperl.org rather than to the module maintainer directly. Many experienced and reponsive experts will be able look at the problem and quickly address it. Please include a thorough description of the problem with code and data examples if at all possible. Reporting Bugs Report bugs to the Bioperl bug tracking system to help us keep track of the bugs and their resolution. Bug reports can be submitted via the web: http://redmine.open-bio.org/projects/bioperl/ AUTHOR - Jason Stajich Email jason-at-bioperl.org CONTRIBUTORS
Sendu Bala - bix@sendu.me.uk APPENDIX
The rest of the documentation details each of the object methods. Internal methods are usually preceded with a _ program_name Title : program_name Usage : $obj->program_name() Function: holds the program name Returns: string Args : None program_dir Title : program_dir Usage : ->program_dir() Function: returns the program directory, obtained from ENV variable. Returns: string Args : new Title : new Usage : my $obj = Bio::Tools::Run::Phylo::PAML::Baseml->new(); Function: Builds a new Bio::Tools::Run::Phylo::PAML::Baseml object Returns : Bio::Tools::Run::Phylo::PAML::Baseml Args : -alignment => the L<Bio::Align::AlignI> object -tree => the L<Bio::Tree::TreeI> object if you want to use runmode 0 or 1 -save_tempfiles => boolean to save the generated tempfiles and NOT cleanup after onesself (default FALSE) run Title : run Usage : $yn->run(); Function: run the Baseml analysis using the default or updated parameters the alignment parameter must have been set Returns : 3 values, $rc = 1 for success, 0 for errors hash reference of the Yang calculated Ka/Ks values this is a set of pairwise observations keyed as sequencenameA->sequencenameB->datatype hash reference same as the previous one except it for the Nei and Gojobori calculated Ka,Ks,omega values Args : optionally, a value appropriate for alignment() and one for tree() NB : Since Baseml doesn't handle spaces in tree node ids, if a tree is in use spaces will be converted to underscores in both the tree node ids and alignment sequence ids. error_string Title : error_string Usage : $obj->error_string($newval) Function: Where the output from the last analysus run is stored. Returns : value of error_string Args : newvalue (optional) alignment Title : alignment Usage : $baseml->alignment($aln); Function: Get/Set the L<Bio::Align::AlignI> object Returns : L<Bio::Align::AlignI> object Args : [optional] L<Bio::Align::AlignI> Comment : We could potentially add support for running directly on a file but we shall keep it simple See also: L<Bio::SimpleAlign> get_parameters Title : get_parameters Usage : my %params = $self->get_parameters(); Function: returns the list of parameters as a hash Returns : associative array keyed on parameter names Args : none set_parameter Title : set_parameter Usage : $baseml->set_parameter($param,$val); Function: Sets a baseml parameter, will be validated against the valid values as set in the %VALIDVALUES class variable. The checks can be ignored if on turns of param checks like this: $baseml->no_param_checks(1) Returns : boolean if set was success, if verbose is set to -1 then no warning will be reported Args : $paramname => name of the parameter $value => value to set the parameter to See also: L<no_param_checks()> set_default_parameters Title : set_default_parameters Usage : $baseml->set_default_parameters(0); Function: (Re)set the default parameters from the defaults (the first value in each array in the %VALIDVALUES class variable) Returns : none Args : boolean: keep existing parameter values NB : using this isn't an especially good idea! You don't need to do anything to end up using default parameters: hence 'default'! Bio::Tools::Run::Wrapper methods no_param_checks Title : no_param_checks Usage : $obj->no_param_checks($newval) Function: Boolean flag as to whether or not we should trust the sanity checks for parameter values Returns : value of no_param_checks Args : newvalue (optional) save_tempfiles Title : save_tempfiles Usage : $obj->save_tempfiles($newval) Function: Returns : value of save_tempfiles Args : newvalue (optional) outfile_name Title : outfile_name Usage : my $outfile = $baseml->outfile_name(); Function: Get/Set the name of the output file for this run (if you wanted to do something special) Returns : string Args : [optional] string to set value to tempdir Title : tempdir Usage : my $tmpdir = $self->tempdir(); Function: Retrieve a temporary directory name (which is created) Returns : string which is the name of the temporary directory Args : none cleanup Title : cleanup Usage : $baseml->cleanup(); Function: Will cleanup the tempdir directory after a PAML run Returns : none Args : none io Title : io Usage : $obj->io($newval) Function: Gets a L<Bio::Root::IO> object Returns : L<Bio::Root::IO> Args : none perl v5.12.3 2011-06-18 Bio::Tools::Run::Phylo::PAML::Baseml(3pm)
All times are GMT -4. The time now is 02:50 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy