Thanks Don, honestly, I can not appreciate the improvement in code given my limitation in understanding it.
The code given by rveri which produces space separated values (or rather just the tokens with out pipe) does suffice. Thanks again for your help!
---------- Post updated at 05:04 PM ---------- Previous update was at 11:22 AM ----------
The servers are cloned from a single image, however on some of the servers, I am gettign this:
What could be the reason. Shell is ksh. Google search did not return any satisfactory responses.
I need a hand with this simple script,
in Unix i have a variable called portal:
$ echo $portal
chu0
when i use awk this variable is not recognized. How can i make awk recognize and print the value of this variable, since the output is not shown i.e.
awk '
BEGIN {printf("%4s\t%14s\n",... (3 Replies)
when I execute this awk stmt ..
awk "/log_directory/ { print $5}" /opt/dba/oraadmin/tools/tmp_purge_op.log
it's returning the whole line as ..
IRMD118_LISTENER1 parameter "log_directory" set to /opt/oracle/10.2/network/log/
my expected output is : /opt/oracle/10.2/network/log
what... (7 Replies)
Whats the syntax to find all lines that matches a text and print out specific fields after the match?
ex:
1: some random text
2: Full name: John E. Smith
3: some random text
4: Full name: Mary J. Lue
5: some random text
So I'd like to print out First names or last names or everything... (2 Replies)
Hi,
I just don't understand awk. I think I'm close here but can someone give me a hand to finish this little parsing routine ?
the input file is formatted like this:
District 2502110
Gsub 2384889
Gsub 1428180
District 2502220
Gsub 1466390
Gsub 1466389
Gsub 1466388
Gsub 1466386
Gsub... (4 Replies)
awk '!_++'
Most importantly, I want to know what the underscore does "!_"
But ideally, please breakdown the whole thing. It is supposed to remove duplicate lines when found in a file. (1 Reply)
Hello;
Trying to figure out how to keep just the contents between the two search lines:
awk '/regexp_1/ ,/regexp_2/'
I do not want lines containing regexp_1 and regexp_2 in the output.
Thank you for any ideas
Video tutorial on how to use code tags in The UNIX and Linux Forums. (5 Replies)
Hello;
I need to print two previous lines after searching for a reg exp:
awk '/haywood/'
should produce the following
===================
p9J46THe020804 89922 Tue Oct 18 21:06 MAILER-DAEMON
(host map: lookup (haywood.com): deferred)
... (1 Reply)
Hi,
I'm new to AWK and I'm having problems comparing a field to a string variable.
/ARTIST/ {x = $2}
$1 ~ x {print $0}My code tries to find a record with the string "ARTIST". Once it finds it, it stores the second field of the record into a variable. I don't know what the problem is for the... (7 Replies)
Hi,
I have a file such that:
40454,31,48,4,1304.967741935484,1
31708,25,48,4,1268.32,1
20900,64501,671,788,0.3240259840932699,0
20137,51358,834,743,0.3920908135051988,0
I want to replace the 6th column by "ones" if it is 1, and with "zeros" if it is 0.
Thanks. (6 Replies)
Hey all,
so I'm using AWK in a project at work, to generate xml from csv. So far things are going relatively smoothly, but I have one thing I can't figure out.
For every field in each row, I must generate <entry name=KWNamex>Field</entry>
Then I will need to pull data from a second file... (6 Replies)
Discussion started by: Parrakarry
6 Replies
LEARN ABOUT MOJAVE
cpanplus::shell::default
CPANPLUS::Shell::Default(3pm) Perl Programmers Reference Guide CPANPLUS::Shell::Default(3pm)NAME
CPANPLUS::Shell::Default - the default CPANPLUS shell
SYNOPSIS
### loading the shell:
$ cpanp # run 'cpanp' from the command line
$ perl -MCPANPLUS -eshell # load the shell from the command line
use CPANPLUS::Shell qw[Default]; # load this shell via the API
# always done via CPANPLUS::Shell
my $ui = CPANPLUS::Shell->new;
$ui->shell; # run the shell
$ui->dispatch_on_input( input => 'x'); # update the source using the
# dispatch method
### when in the shell:
### Note that all commands can also take options.
### Look at their underlying CPANPLUS::Backend methods to see
### what options those are.
cpanp> h # show help messages
cpanp> ? # show help messages
cpanp> m Acme # find acme modules, allows regexes
cpanp> a KANE # find modules by kane, allows regexes
cpanp> f Acme::Foo # get a list of all releases of Acme::Foo
cpanp> i Acme::Foo # install Acme::Foo
cpanp> i Acme-Foo-1.3 # install version 1.3 of Acme::Foo
cpanp> i <URI> # install from URI, like ftp://foo.com/X.tgz
cpanp> i <DIR> # install from an absolute or relative directory
cpanp> i 1 3..5 # install search results 1, 3, 4 and 5
cpanp> i * # install all search results
cpanp> a KANE; i *; # find modules by kane, install all results
cpanp> t Acme::Foo # test Acme::Foo, without installing it
cpanp> u Acme::Foo # uninstall Acme::Foo
cpanp> d Acme::Foo # download Acme::Foo
cpanp> z Acme::Foo # download & extract Acme::Foo, then open a
# shell in the extraction directory
cpanp> c Acme::Foo # get a list of test results for Acme::Foo
cpanp> l Acme::Foo # view details about the Acme::Foo package
cpanp> r Acme::Foo # view Acme::Foo's README file
cpanp> o # get a list of all installed modules that
# are out of date
cpanp> o 1..3 # list uptodateness from a previous search
cpanp> s conf # show config settings
cpanp> s conf md5 1 # enable md5 checks
cpanp> s program # show program settings
cpanp> s edit # edit config file
cpanp> s reconfigure # go through initial configuration again
cpanp> s selfupdate # update your CPANPLUS install
cpanp> s save # save config to disk
cpanp> s mirrors # show currently selected mirrors
cpanp> ! [PERL CODE] # execute the following perl code
cpanp> b # create an autobundle for this computers
# perl installation
cpanp> x # reload index files (purges cache)
cpanp> x --update_source # reload index files, get fresh source files
cpanp> p [FILE] # print error stack (to a file)
cpanp> v # show the banner
cpanp> w # show last search results again
cpanp> q # quit the shell
cpanp> e # exit the shell and reload
cpanp> /plugins # list available plugins
cpanp> /? PLUGIN # list help test of <PLUGIN>
### common options:
cpanp> i ... --skiptest # skip tests
cpanp> i ... --force # force all operations
cpanp> i ... --verbose # run in verbose mode
DESCRIPTION
This module provides the default user interface to "CPANPLUS". You can start it via the "cpanp" binary, or as detailed in the SYNOPSIS.
BUG REPORTS
Please report bugs or other issues to <bug-cpanplus@rt.cpan.org<gt>.
AUTHOR
This module by Jos Boumans <kane@cpan.org>.
COPYRIGHT
The CPAN++ interface (of which this module is a part of) is copyright (c) 2001 - 2007, Jos Boumans <kane@cpan.org>. All rights reserved.
This library is free software; you may redistribute and/or modify it under the same terms as Perl itself.
SEE ALSO
CPANPLUS::Shell::Classic, CPANPLUS::Shell, cpanp
perl v5.18.2 2014-01-06 CPANPLUS::Shell::Default(3pm)