Sponsored Content
Top Forums Shell Programming and Scripting Remove certain column with numeric value Post 302785699 by radoulov on Tuesday 26th of March 2013 07:51:12 AM
Old 03-26-2013
With Perl (core modules):

Code:
perl -F, '-MScalar::Util qw(looks_like_number)' -lane'
  print if looks_like_number $F[4]
  ' infile

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

to remove space after numeric

I have a script that shows me the disk SPace used by different dir under my home dir: #!/bin/ksh cd /ednpdtu3/u01/pipe p1=`df -g | tail -1 | tr -s " " | cut -d " " -f2` echo "Total Disk Space of Home Dir is $p1 GB" p2=`df -g | tail -1 | tr -s " " | cut -d " " -f3` echo "Total Disk Space... (2 Replies)
Discussion started by: ali560045
2 Replies

2. Shell Programming and Scripting

Remove non numeric values from a variable

Hello all, I am working on a basic script but need a little help. Issue: I am running a SQL Query using sqlplus and a shell script. I have the output of the statement stored as variable $A. $A is set to "other text here 45678754 other text here". I need to strip all text except that numeric... (13 Replies)
Discussion started by: ownedthawte
13 Replies

3. Shell Programming and Scripting

sed/awk-adding numeric to a column

I have a txt file as follows Code: Oct 1 file1 4144 Oct 1 file23 5170 Oct 2 file5 3434 Oct 21 file56 2343 I need to add a new column by marking the right log file from current directory. For example populate like this. Please not in the second columt for "1" it has... (2 Replies)
Discussion started by: gubbu
2 Replies

4. Shell Programming and Scripting

How to check if a column is having a numeric value or not in a file?

Hi, I want to know, how we find out if a column is having a numeric value or not. For Example if we have a csv file as ASDF,QWER,GHJK,123,FGHY,9876 GHTY,NVHR,WOPI,623,HFBS,5386 we need to find out if the 4th and 6th column has muneric value or not. Thanks in advance Keerthan (9 Replies)
Discussion started by: keerthan
9 Replies

5. UNIX for Dummies Questions & Answers

How to remove numeric characters in the flat file

HI, can any one help me please .. i have flat file like qwer123rt ass3242ccf jjk654 kjh838ppp nhdg453ok hdkk34 i want remove numeric characters in the flat file i want output like this qwerrt assccf jjk kjhppp nhdgok hdkk help me... (4 Replies)
Discussion started by: rafimd1985
4 Replies

6. Shell Programming and Scripting

Sorting file based on a numeric column

Hi, I use UBUNTU 12.04. I have a file with this structure: Name 2 1245787 A G 12 14 12 14 .... Name 1 1245789 C T 13 12 12 12..... I would like to sort my file based on the second column so to have this output for example: Name 1 1245789 C T 13 12 12 12..... Name 2 1245787 A G 12 14... (4 Replies)
Discussion started by: Homa
4 Replies

7. UNIX for Advanced & Expert Users

Sort by second column numeric values

From googling and reading man pages I figured out this sorts the first column by numeric values. sort -g -k 1,1 Why does the -n option not work? The man pages were a bit confusing. And what if I want to sort the second column numerically? I haven't been able to figure that out. The file... (7 Replies)
Discussion started by: cokedude
7 Replies

8. Shell Programming and Scripting

Remove space from numeric value

Hello, I need help. I have xml file and there are one extra space on number <EpiReference>1 42345</EpiReference>. And of cource, the value change on every new file. I need remove space from that value what is in between <EpiReference> and </EpiReference>. How I can do that? This are example... (9 Replies)
Discussion started by: Jopsulainen
9 Replies

9. Shell Programming and Scripting

Average each numeric column

Hi all, Does anyone know of an efficient unix script to average each numeric column of a multi-column tab delimited file (with header) with some character columns. Here is an example input file: CHR RS_ID ALLELE POP1 POP2 POP3 POP4 POP5 POP6 POP7 POP8... (7 Replies)
Discussion started by: Geneanalyst
7 Replies

10. UNIX for Beginners Questions & Answers

Replace a numeric values in a certain column

Hi All, I am trying to replace a certain value from one place in a file . In the below file at position 35 I will have 8 I need to modify all 8 in that position to 7 I tried awk '{gsub("8","7",$35)}1' infile > outfile ----> not working sed -i 's/8/7'g' infile --- it is replacing all... (3 Replies)
Discussion started by: arunkumar_mca
3 Replies
Params::Classify(3pm)					User Contributed Perl Documentation				     Params::Classify(3pm)

NAME
Params::Classify - argument type classification SYNOPSIS
use Params::Classify qw( scalar_class is_undef check_undef is_string check_string is_number check_number is_glob check_glob is_regexp check_regexp is_ref check_ref ref_type is_blessed check_blessed blessed_class is_strictly_blessed check_strictly_blessed is_able check_able ); $c = scalar_class($arg); if(is_undef($arg)) { check_undef($arg); if(is_string($arg)) { check_string($arg); if(is_number($arg)) { check_number($arg); if(is_glob($arg)) { check_glob($arg); if(is_regexp($arg)) { check_regexp($arg); if(is_ref($arg)) { check_ref($arg); $t = ref_type($arg); if(is_ref($arg, "HASH")) { check_ref($arg, "HASH"); if(is_blessed($arg)) { check_blessed($arg); if(is_blessed($arg, "IO::Handle")) { check_blessed($arg, "IO::Handle"); $c = blessed_class($arg); if(is_strictly_blessed($arg, "IO::Pipe::End")) { check_strictly_blessed($arg, "IO::Pipe::End"); if(is_able($arg, ["print", "flush"])) { check_able($arg, ["print", "flush"]); DESCRIPTION
This module provides various type-testing functions. These are intended for functions that, unlike most Perl code, care what type of data they are operating on. For example, some functions wish to behave differently depending on the type of their arguments (like overloaded functions in C++). There are two flavours of function in this module. Functions of the first flavour only provide type classification, to allow code to discriminate between argument types. Functions of the second flavour package up the most common type of type discrimination: checking that an argument is of an expected type. The functions come in matched pairs, of the two flavours, and so the type enforcement functions handle only the simplest requirements for arguments of the types handled by the classification functions. Enforcement of more complex types may, of course, be built using the classification functions, or it may be more convenient to use a module designed for the more complex job, such as Params::Validate. This module is implemented in XS, with a pure Perl backup version for systems that can't handle XS. TYPE CLASSIFICATION
This module divides up scalar values into the following classes: o undef o string (defined ordinary scalar) o typeglob (yes, typeglobs fit into scalar variables) o regexp (first-class regular expression objects in Perl 5.11 onwards) o reference to unblessed object (further classified by physical data type of the referenced object) o reference to blessed object (further classified by class blessed into) These classes are mutually exclusive and should be exhaustive. This classification has been chosen as the most useful when one wishes to discriminate between types of scalar. Other classifications are possible. (For example, the two reference classes are distinguished by a feature of the referenced object; Perl does not internally treat this as a feature of the reference.) FUNCTIONS
Each of these functions takes one scalar argument (ARG) to be tested, possibly with other arguments specifying details of the test. Any scalar value is acceptable for the argument to be tested. Each "is_" function returns a simple truth value result, which is true iff ARG is of the type being checked for. Each "check_" function will return normally if the argument is of the type being checked for, or will "die" if it is not. Classification scalar_class(ARG) Determines which of the five classes described above ARG falls into. Returns "UNDEF", "STRING", "GLOB", "REGEXP", "REF", or "BLESSED" accordingly. The Undefined Value is_undef(ARG) check_undef(ARG) Check whether ARG is "undef". "is_undef(ARG)" is precisely equivalent to "!defined(ARG)", and is included for completeness. Strings is_string(ARG) check_string(ARG) Check whether ARG is defined and is an ordinary scalar value (not a reference, typeglob, or regexp). This is what one usually thinks of as a string in Perl. In fact, any scalar (including "undef" and references) can be coerced to a string, but if you're trying to classify a scalar then you don't want to do that. is_number(ARG) check_number(ARG) Check whether ARG is defined and an ordinary scalar (i.e., satisfies "is_string" above) and is an acceptable number to Perl. This is what one usually thinks of as a number. Note that simple ("is_string"-satisfying) scalars may have independent numeric and string values, despite the usual pretence that they have only one value. Such a scalar is deemed to be a number if either it already has a numeric value (e.g., was generated by a numeric literal or an arithmetic computation) or its string value has acceptable syntax for a number (so it can be converted). Where a scalar has separate numeric and string values (see "dualvar" in Scalar::Util), it is possible for it to have an acceptable numeric value while its string value does not have acceptable numeric syntax. Be careful to use such a value only in a numeric context, if you are using it as a number. "scalar_num_part" in Scalar::Number extracts the numeric part of a scalar as an ordinary number. ("0+ARG" suffices for that unless you need to preserve floating point signed zeroes.) A number may be either a native integer or a native floating point value, and there are several subtypes of floating point value. For classification, and other handling of numbers in scalars, see Scalar::Number. For details of the two numeric data types, see Data::Integer and Data::Float. This function differs from "looks_like_number" (see "looks_like_number" in Scalar::Util; also "looks_like_number" in perlapi for a lower-level description) in excluding "undef", typeglobs, and references. Why "looks_like_number" returns true for "undef" or typeglobs is anybody's guess. References, if treated as numbers, evaluate to the address in memory that they reference; this is useful for comparing references for equality, but it is not otherwise useful to treat references as numbers. Blessed references may have overloaded numeric operators, but if so then they don't necessarily behave like ordinary numbers. "looks_like_number" is also confused by dualvars: it looks at the string portion of the scalar. Typeglobs is_glob(ARG) check_glob(ARG) Check whether ARG is a typeglob. Regexps is_regexp(ARG) check_regexp(ARG) Check whether ARG is a regexp object. References to Unblessed Objects is_ref(ARG) check_ref(ARG) Check whether ARG is a reference to an unblessed object. If it is, then the referenced data type can be determined using "ref_type" (see below), which will return a string such as "HASH" or "SCALAR". ref_type(ARG) Returns "undef" if ARG is not a reference to an unblessed object. Otherwise, determines what type of object is referenced. Returns "SCALAR", "ARRAY", "HASH", "CODE", "FORMAT", or "IO" accordingly. Note that, unlike "ref", this does not distinguish between different types of referenced scalar. A reference to a string and a reference to a reference will both return "SCALAR". Consequently, what "ref_type" returns for a particular reference will not change due to changes in the value of the referent, except for the referent being blessed. is_ref(ARG, TYPE) check_ref(ARG, TYPE) Check whether ARG is a reference to an unblessed object of type TYPE, as determined by "ref_type". TYPE must be a string. Possible TYPEs are "SCALAR", "ARRAY", "HASH", "CODE", "FORMAT", and "IO". References to Blessed Objects is_blessed(ARG) check_blessed(ARG) Check whether ARG is a reference to a blessed object. If it is, then the class into which the object was blessed can be determined using "blessed_class". is_blessed(ARG, CLASS) check_blessed(ARG, CLASS) Check whether ARG is a reference to a blessed object that claims to be an instance of CLASS (via its "isa" method; see "isa" in perlobj). CLASS must be a string, naming a Perl class. blessed_class(ARG) Returns "undef" if ARG is not a reference to a blessed object. Otherwise, returns the class into which the object is blessed. "ref" (see "ref" in perlfunc) gives the same result on references to blessed objects, but different results on other types of value. "blessed_class" is actually identical to "blessed" in Scalar::Util. is_strictly_blessed(ARG) check_strictly_blessed(ARG) Check whether ARG is a reference to a blessed object, identically to "is_blessed". This exists only for symmetry; the useful form of "is_strictly_blessed" appears below. is_strictly_blessed(ARG, CLASS) check_strictly_blessed(ARG, CLASS) Check whether ARG is a reference to an object blessed into CLASS exactly. CLASS must be a string, naming a Perl class. Because this excludes subclasses, this is rarely what one wants, but there are some specialised occasions where it is useful. is_able(ARG) check_able(ARG) Check whether ARG is a reference to a blessed object, identically to "is_blessed". This exists only for symmetry; the useful form of "is_able" appears below. is_able(ARG, METHODS) check_able(ARG, METHODS) Check whether ARG is a reference to a blessed object that claims to implement the methods specified by METHODS (via its "can" method; see "can" in perlobj). METHODS must be either a single method name or a reference to an array of method names. Each method name is a string. This interface check is often more appropriate than a direct ancestry check (such as "is_blessed" performs). BUGS
Probably ought to handle something like Params::Validate's scalar type specification system, which makes much the same distinctions. SEE ALSO
Data::Float, Data::Integer, Params::Validate, Scalar::Number, Scalar::Util AUTHOR
Andrew Main (Zefram) <zefram@fysh.org> COPYRIGHT
Copyright (C) 2004, 2006, 2007, 2009, 2010 Andrew Main (Zefram) <zefram@fysh.org> Copyright (C) 2009, 2010 PhotoBox Ltd LICENSE
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-11-17 Params::Classify(3pm)
All times are GMT -4. The time now is 04:55 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy