#!/bin/bash
echo "UserName PID Command"
ps -ef > ps.temp
grep '^\{2,3\}\{4\}' ps.temp > ps.temp2
cut -f1,2,8 ps.temp2
rm ps.temp*
I am having some problems with the cut command. I only want to display the UID (field 1), PID(field 2), and Command(field 8). Right now the whole ps -ef... (5 Replies)
I went through quite a few threads and didn't find anything on this. I also looked on other sites and couldn't turn up an answer.
For completeness sake, I'm working off of solaris 10 in the korn shell environment.
I wrote a script for a buddy to help him out with the following issue.
He... (12 Replies)
I am trying to cut and delete using sed and redirect back into the file. This is not working write. When testing the script, it hangs. Any idea what I am doing wrong here.
################ Reads the input file to cut volumes for returns and CUT_ERVTAPE_FILE()
{
echo "working on cut... (2 Replies)
Hi All,
I have a small problem, hope you can help me out here.
I have a file that contains the same format of lines in 99% of the cases.
906516 XYZ.NNN V 0000 20070711164648 userID1 userID2 hostname 20070711164641
There are unfortunately several lines with these... (5 Replies)
hi, sorry for asking what I am sure is a really easy question, I am wanting to cut the users real name from the output of 'finger'.
$ cut -f2-3 filename
is in my script but it only seems to cut the first line.
I need to cut the 2nd and 3rd word from each line and store them in variables... (1 Reply)
Hi,
I have created a variable abc within my script which can have values as follows
abc = Ram,Iam
or it can be
abc = Uam
or it can be
abc = Sam,Tam,Pam
Basically it can have a max of 3 values , seperated by comma.
I want to assign these 3 values to 3 different variables
In case of... (2 Replies)
how to make cut and awk treat "a b" as a single column rather then two separate columns "a and b"?
how to remove " symbol from "a b" so there is only a b?
Please help
Regards
Karol (14 Replies)
Suppose one has a file consisting of more than 2 columns and one has to extract a few columns from this file and swap some columns at the same time. Example: extract column 1, 2 and 4 from a file foo.csv and place them in the order 2, 4 and 1 into file foo.txt. I would be inclined to do this:
cut... (4 Replies)
I've got a file that contains a large list of links in this type of style:
'home_dir\2009\09\01\file.html'
I'd like to cut off all of the characters left of 'file.html'. I tried:
cat file.txt | cut -d\ -f4
but it told me that I had an invalid delimiter.
So I tried:
cat... (5 Replies)
hi, I used cut to get the
I have a file f1 with content:
101.2 ms RTT from 3WHS
95.2 ms RTT from 3WHS
97.3 ms RTT from 3WHS
97.4 ms RTT from 3WHS
122.2 ms RTT from 3WHS
103.5 ms RTT from... (2 Replies)
Discussion started by: esolve
2 Replies
LEARN ABOUT DEBIAN
devel::refcount
Devel::Refcount(3pm) User Contributed Perl Documentation Devel::Refcount(3pm)NAME
"Devel::Refcount" - obtain the REFCNT value of a referent
SYNOPSIS
use Devel::Refcount qw( refcount );
my $anon = [];
print "Anon ARRAY $anon has " . refcount($anon) . " reference
";
my $otherref = $anon;
print "Anon ARRAY $anon now has " . refcount($anon) . " references
";
DESCRIPTION
This module provides a single function which obtains the reference count of the object being pointed to by the passed reference value.
FUNCTIONS
$count = refcount($ref)
Returns the reference count of the object being pointed to by $ref.
COMPARISON WITH SvREFCNT
This function differs from "Devel::Peek::SvREFCNT" in that SvREFCNT() gives the reference count of the SV object itself that it is passed,
whereas refcount() gives the count of the object being pointed to. This allows it to give the count of any referent (i.e. ARRAY, HASH,
CODE, GLOB and Regexp types) as well.
Consider the following example program:
use Devel::Peek qw( SvREFCNT );
use Devel::Refcount qw( refcount );
sub printcount
{
my $name = shift;
printf "%30s has SvREFCNT=%d, refcount=%d
",
$name, SvREFCNT($_[0]), refcount($_[0]);
}
my $var = [];
printcount 'Initially, $var', $var;
my $othervar = $var;
printcount 'Before CODE ref, $var', $var;
printcount '$othervar', $othervar;
my $code = sub { undef $var };
printcount 'After CODE ref, $var', $var;
printcount '$othervar', $othervar;
This produces the output
Initially, $var has SvREFCNT=1, refcount=1
Before CODE ref, $var has SvREFCNT=1, refcount=2
$othervar has SvREFCNT=1, refcount=2
After CODE ref, $var has SvREFCNT=2, refcount=2
$othervar has SvREFCNT=1, refcount=2
Here, we see that SvREFCNT() counts the number of references to the SV object passed in as the scalar value - the $var or $othervar
respectively, whereas refcount() counts the number of reference values that point to the referent object - the anonymous ARRAY in this
case.
Before the CODE reference is constructed, both $var and $othervar have SvREFCNT() of 1, as they exist only in the current lexical pad. The
anonymous ARRAY has a refcount() of 2, because both $var and $othervar store a reference to it.
After the CODE reference is constructed, the $var variable now has an SvREFCNT() of 2, because it also appears in the lexical pad for the
new anonymous CODE block.
PURE-PERL FALLBACK
An XS implementation of this function is provided, and is used by default. If the XS library cannot be loaded, a fallback implementation in
pure perl using the "B" module is used instead. This will behave identically, but is much slower.
Rate pp xs
pp 225985/s -- -66%
xs 669570/s 196% --
SEE ALSO
o Test::Refcount - assert reference counts on objects
AUTHOR
Paul Evans <leonerd@leonerd.org.uk>
perl v5.14.2 2011-11-15 Devel::Refcount(3pm)