Sponsored Content
Full Discussion: How to execute Grep in Perl.
Top Forums Shell Programming and Scripting How to execute Grep in Perl. Post 302343876 by pludi on Friday 14th of August 2009 01:59:08 AM
Old 08-14-2009
Quote:
Originally Posted by jim mcnamara
[...]Coding this fully in perl with is a much larger endeavor....
Nope Smilie (Red: grep; Blue: sort; Green: uniq)
Code:
$ cat test_1
cdge-b-pas02.com 10.12.10.12
cdge-c-pas03.com 10.12.10.50
edge-a-pas01.com 10.12.10.11
cdge-d-pas03.com 10.12.10.10
edge-c-pas03.com 10.12.10.50
edge-d-pas03.com 10.12.10.10
edge-b-pas02.com 10.12.10.12
cdge-a-pas01.com 10.12.10.11
$ perl -se '@a=sort grep { /edge/ && !$seen{$_}++ } <>; print @a' test_1
edge-a-pas01.com 10.12.10.11
edge-b-pas02.com 10.12.10.12
edge-c-pas03.com 10.12.10.50
edge-d-pas03.com 10.12.10.10

This User Gave Thanks to pludi For This Post:
 

10 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

a cron job needs a perl script to execute

Hello evreyone, this is my first post, and to say i'm new to this is an understatement. I know very little about perl scripts and hope some one can help me. i'm looking to get a script that a cron job can execute. what the script needs to to is 1) connect to a mysql database 2) go to a... (2 Replies)
Discussion started by: Exader
2 Replies

2. Shell Programming and Scripting

How to execute java program from perl

hello all how can i run the java command that can eccept N numbers of args for example : java -cp .;foo.jar myApp 1 "ww" or java -cp .;foo.jar myApp 1 2 3 "ww" or java -cp .;foo.jar myApp "args1" "args2" "args3" Thanks (1 Reply)
Discussion started by: umen
1 Replies

3. Shell Programming and Scripting

Use grep result to execute next command

Hi I am trying to run 2 servers using a script one after the other. I start the first one: run.sh -c servername >> jboss_log.txt & Then I have to wait until I see Started message in the log file before I launch the other server. I can't use sleep because I am not sure how long it'll... (5 Replies)
Discussion started by: iririr
5 Replies

4. UNIX for Dummies Questions & Answers

Execute grep command within a folder

Experts, i need your help to made an enhance query using the existing one. i'm using a command "find . -exec grep -l 'search string' {} \;" to search a particular sting within the file within a folder. Basically, my idea is to fine tune my search. What i want is, instead of searching all files... (2 Replies)
Discussion started by: gav_dhiman
2 Replies

5. Shell Programming and Scripting

Execute in unix not in PERL

Hi All, This below command is working fine with unix box. However i could not able to run it in PERL. kidly suggest??? perl -ne '{push @x, $_}END{pop(@x); print @x}' create2.txt (15 Replies)
Discussion started by: adaleru
15 Replies

6. Shell Programming and Scripting

Perl Script to execute todays date.

Hi Folks, I have created a script last month to retrive files thru FTP and cronjob was running fine till yesterday. But the naming convention of the daily file is Filename_<date>.xml where date is YYYYMMDD. But today i have received file name as Filename_20110232.xml :( Part of my Perl... (4 Replies)
Discussion started by: Sendhil.Kumaran
4 Replies

7. Shell Programming and Scripting

execute ssh command via perl

Hi I have a perl command that doesn't seem to be working correctly. It appears to be fine but even when i try and run it manually same thing. Can someone take a look at this and tell me what they think the problem could be? Here is the perl Line: system ("echo 'ssh -t -t $user\@$_ \"cd... (3 Replies)
Discussion started by: vpundit
3 Replies

8. Shell Programming and Scripting

Execute immediate in perl script

hi All, i have to modify a shell script written in Perl. i have to use execute immediate within this. i have to create a temporary table but it should have name like ar_data_$mmyyyy , how can i achieve this? any help on this would be highly appriciated. (6 Replies)
Discussion started by: lovelysethii
6 Replies

9. Shell Programming and Scripting

[perl] execute remotely script

Hello Can some help with write part of perl script I need something like this in perl SSH="/bin/ssh -o BatchMode=yes -o" USER="test" SRV="server" SCRIPT_TO_EXEC="/tmp/test.sh" -> shell script OUT=/tmp/out.file ${SSH} -l ${USER} ${SRV} 'sudo /usr/bin/ksh -s' < ${SCRIPT_TO_EXEC} >> ${OUT}... (1 Reply)
Discussion started by: vikus
1 Replies

10. Programming

PERL: In a perl-scripttTrying to execute another perl-script that SETS SOME VARIABLES !

I have reviewed many examples on-line about running another process (either PERL or shell command or a program), but do not find any usefull for my needs way. (Reviewed and not useful the system(), 'back ticks', exec() and open()) I would like to run another PERL-script from first one, not... (1 Reply)
Discussion started by: alex_5161
1 Replies
GLEDGEFLAG(3G)															    GLEDGEFLAG(3G)

NAME
glEdgeFlag, glEdgeFlagv - flag edges as either boundary or nonboundary C SPECIFICATION
void glEdgeFlag( GLboolean flag ) PARAMETERS
flag Specifies the current edge flag value, either GL_TRUE or GL_FALSE. The initial value is GL_TRUE. C SPECIFICATION
void glEdgeFlagv( const GLboolean *flag ) PARAMETERS
flag Specifies a pointer to an array that contains a single boolean element, which replaces the current edge flag value. DESCRIPTION
Each vertex of a polygon, separate triangle, or separate quadrilateral specified between a glBegin/glEnd pair is marked as the start of either a boundary or nonboundary edge. If the current edge flag is true when the vertex is specified, the vertex is marked as the start of a boundary edge. Otherwise, the vertex is marked as the start of a nonboundary edge. glEdgeFlag sets the edge flag bit to GL_TRUE if flag is GL_TRUE, and to GL_FALSE otherwise. The vertices of connected triangles and connected quadrilaterals are always marked as boundary, regardless of the value of the edge flag. Boundary and nonboundary edge flags on vertices are significant only if GL_POLYGON_MODE is set to GL_POINT or GL_LINE. See glPolygonMode. NOTES
The current edge flag can be updated at any time. In particular, glEdgeFlag can be called between a call to glBegin and the corresponding call to glEnd. ASSOCIATED GETS
glGet with argument GL_EDGE_FLAG SEE ALSO
glBegin(3G), glEdgeFlagPointer(3G), glPolygonMode(3G) GLEDGEFLAG(3G)
All times are GMT -4. The time now is 03:38 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy