I'm in an introduction to Unix class and well I'm kind of stuck on one part of the lab for this week or shell scripts. Basically we're given a file named address.data and we're supposed to create a script to sort it according to zip code, last name, and first name (not at the same time of course).... (0 Replies)
I have an array full of string values that need to be sorted, but if a value starts with (regex) 0^ it should be at the beginning of the array. Otherwise the array should be sorted normally using ascii sort.
Please help me create the sub to pass to the sort function. (7 Replies)
I have the following output where I need to sort the second column numerically (starting with IBMULT3580-TD10 and ending in IBMULT3580-TD123)
Drv DriveName
0 IBMULT3580-TD13
1 IBMULT3580-TD18
2 IBMULT3580-TD14
3 IBMULT3580-TD10
4 IBMULT3580-TD11
5 IBMULT3580-TD17
... (8 Replies)
Hi,
We have files coming in the system and we want to sort it in ascending order with date and sequence.
The file pattern are inbound_crp_date_sequence.xml
example we have file as below:
inbound_crp_20100422_10.xml
inbound_crp_20100422_2.xml
inbound_crp_20100422_3.xml... (2 Replies)
Let's say that I have a database that I call part ID. This database has the following grouping:
Dart1=4
Dart2=8
Dart3=12
Fork1=68
Fork2=72
Fork3=64
Bike1=28
Bike2=24
Bike3=20
Car1=44
Car2=40
Car3=36
I want to write a program that would read this database and tell me when the... (19 Replies)
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)
Hi I need how to sort string characters
for Example i have a file that contains this data
example string "fan" but i want to display "afn" contained words
"afn" is in sorted format for fan.
File data
faty
gafny
gaifny
dafan
gafnniunt
O/p
gafny
gafnniunt (3 Replies)
continuing from my previous post, whose link is given below as a reference
https://www.unix.com/shell-programming-scripting/171076-shell-scripting.html#post302573569
consider there is create table commands in a file for eg:
CREATE TABLE `Blahblahblah` (
`id` int(11) NOT NULL... (2 Replies)
here is what i want to achieve... consider a file contains below contents. the file size is large about 60mb
cat dump.sql
INSERT INTO `table1` (`id`, `action`, `date`, `descrip`, `lastModified`) VALUES (1,'Change','2011-05-05 00:00:00','Account Updated','2012-02-10... (10 Replies)
Hello Everyone, I need help here . I need to sort a file for one of my requirement , The file has to be sorted using a key with 4 columns. Sorting is working fine on those 4 columns but when the key is matching for many rows the other columns are also getting sorted which is not required .
... (11 Replies)
Discussion started by: richa_240889
11 Replies
LEARN ABOUT REDHAT
universal
UNIVERSAL(3pm) Perl Programmers Reference Guide UNIVERSAL(3pm)NAME
UNIVERSAL - base class for ALL classes (blessed references)
SYNOPSIS
$is_io = $fd->isa("IO::Handle");
$is_io = Class->isa("IO::Handle");
$sub = $obj->can("print");
$sub = Class->can("print");
use UNIVERSAL qw( isa can VERSION );
$yes = isa $ref, "HASH" ;
$sub = can $ref, "fandango" ;
$ver = VERSION $obj ;
DESCRIPTION
"UNIVERSAL" is the base class which all bless references will inherit from, see perlobj.
"UNIVERSAL" provides the following methods and functions:
$obj->isa( TYPE ), CLASS->isa( TYPE ), isa( VAL, TYPE )
C<TYPE> is a package name
$obj is a blessed reference or a string containing a package name
C<CLASS> is a package name
C<VAL> is any of the above or an unblessed reference
When used as an instance or class method ("$obj-"isa( TYPE )>), "isa" returns true if $obj is blessed into package "TYPE" or inherits
from package "TYPE".
When used as a class method ("CLASS-"isa( TYPE )>; sometimes referred to as a static method), "isa" returns true if "CLASS" inherits
from (or is itself) the name of the package "TYPE" or inherits from package "TYPE".
When used as a function, like
use UNIVERSAL qw( isa ) ;
$yes = isa $h, "HASH";
$yes = isa "Foo", "Bar";
or
require UNIVERSAL ;
$yes = UNIVERSAL::isa $a, "ARRAY";
, "isa" returns true in the same cases as above and also if "VAL" is an unblessed reference to a perl variable of type "TYPE", such as
"HASH", "ARRAY", or "Regexp".
$obj->can( METHOD ), CLASS->can( METHOD ), can( VAL, METHOD )
"can" checks if the object or class has a method called "METHOD". If it does then a reference to the sub is returned. If it does not
then undef is returned. This includes methods inherited or imported by $obj, "CLASS", or "VAL".
"can" cannot know whether an object will be able to provide a method through AUTOLOAD, so a return value of undef does not necessarily
mean the object will not be able to handle the method call. To get around this some module authors use a forward declaration (see perl-
sub) for methods they will handle via AUTOLOAD. For such 'dummy' subs, "can" will still return a code reference, which, when called,
will fall through to the AUTOLOAD. If no suitable AUTOLOAD is provided, calling the coderef will cause an error.
"can" can be called as a class (static) method, an object method, or a function.
When used as a function, if "VAL" is a blessed reference or package name which has a method called "METHOD", "can" returns a reference
to the subroutine. If "VAL" is not a blessed reference, or if it does not have a method "METHOD", undef is returned.
VERSION ( [ REQUIRE ] )
"VERSION" will return the value of the variable $VERSION in the package the object is blessed into. If "REQUIRE" is given then it will
do a comparison and die if the package version is not greater than or equal to "REQUIRE".
"VERSION" can be called as either a class (static) method, an object method or or a function.
These subroutines should not be imported via "use UNIVERSAL qw(...)". If you want simple local access to them you can do
*isa = &UNIVERSAL::isa;
to import isa into your package.
perl v5.8.0 2002-06-01 UNIVERSAL(3pm)