awk vs perl Post: 302393029

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

AWK embeded PERL

Hello Guys, I am refering to this great forum once again for help. After various attempts at this, I am still failing to obtain the desire effect. I have to write a perl script which: 1- reads two values from the user (e.g name & passwd) 2- check each value against a file containing the...

2. Shell Programming and Scripting

awk to perl convert

Dear Collegue Do anybody help me to convert this AWK script to Perl script { for (i = 2; i <= length ($0); i++) { x = substr($0, i , 1) if (c > 0) { b = b x if (x == "(") c++ ...

3. Shell Programming and Scripting

awk command with PERL

Hi All, My Input file looks like below: Input: 100,200,300 $fw=`head -1 test.csv | awk -F, '{print \$1}'`; $fw="'$fw" $fw="$fw'" print $fw Output:'100' I want the first field to be printed in single quotes ('') like above. I could get the ouptput but the problem is single...

4. Shell Programming and Scripting

awk or perl

hi all I am new to awk/perl I would appreciate it if you could help! how do I read a sub folder and their files. e.g. simulation/10ms/router1.dat, router2.dat,..., router16.dat simulation/100ms/router1.dat, router2.dat,..., router16.dat simulation/300ms/router1.dat,...

5. Shell Programming and Scripting

Using perl grep and awk

I have a script to get server information i wrote in perl because i would like to learn it (and I use it for work). It works great, however i would like to know if there is a good way to reduce the following line. Sean

6. Shell Programming and Scripting

awk - to -- PERL

DEAR ALL, i am using following command to fetch some records from more then 50000 files... command is taking more time .... can i have perl command for the same...( i am New to perl ) awk -F "|" '{ if($4==3244898 && $5==5000185) print $66}' *.DATA

7. Shell Programming and Scripting

get value between <abc and > by perl, awk

Hi Everyone, cat 1.txt a <abc b vfff c 000> d 4444 the output is: <abcvfff000> by using perl or awk, can get the value betwee "<abc" and ">", assume 1.txt has lots of those tags, so the output can filter out all those values. Please advice. Thanks

8. Shell Programming and Scripting

awk and perl grouping.

Hello folks. After awk, i have decided to start to learn perl, and i need some help. I have following output : 1 a 1 b 2 k 2 f 3 s 3 p Now with awk i get desired output by issuing : awk ' { a = a FS $2 } END { for ( i in a) print i,a }' input 1 a b 2 k f 3 s p Can...

9. Shell Programming and Scripting

What is the equivalent of NR (awk) in perl?

Hello, I searched online; it seems that perl use $NR as NR in awk; however it does not work for me. For example, how to re-write the following awk using perl: awk '{ print NR}' inputfile---------- Post updated at 01:55 PM ---------- Previous update was at 12:49 PM ---------- I found...

10. UNIX for Beginners Questions & Answers

Converting awk to perl

Hello. I'm trying to convert an awk script I wrote to perl (which I just started self-teaching). I tried the a2p command but I couldn't make sense of most of it. Here was the awk code: BEGIN{ FS = "," print "NAME\tLOW\tHIGH\tAVERAGE" a=0 } { if(a==0){ a+=1

LEARN ABOUT DEBIAN

merge_fonts

merge_fonts(3alleg4)						  Allegro manual					      merge_fonts(3alleg4)

NAME

       merge_fonts - Merges two fonts into one font. Allegro game programming library.

SYNOPSIS

       #include <allegro.h>

       FONT *merge_fonts(FONT *f1, FONT *f2)

DESCRIPTION

       This function merges the character ranges from two fonts and returns a new font containing all characters in the old fonts. In general, you
       cannot merge fonts of different types (eg, TrueType fonts and bitmapped fonts), but as a special case, this function can  promote  a  mono-
       chrome bitmapped font to a color font and merge those. Example:

	  FONT *myfont;
	  FONT *myfancy_font;
	  FONT *lower_range;
	  FONT *upper_range;
	  FONT *capitals;
	  FONT *combined_font;
	  FONT *tempfont;
	  ...
	  /* Create a font that contains the capitals from  */
	  /* the fancy font but other characters from myfont */
	  lower_range = extract_font_range(myfont, -1, 'A'-1);
	  upper_range = extract_font_range(myfont, 'Z'+1, -1);
	  capitals = extract_font_range(myfancy_font, 'A', 'Z');

	  tempfont = merge_fonts(lower_range, capitals);
	  combined_font = merge_fonts(tempfont, upper_range);

	  /* Clean up temporary fonts */
	  destroy_font(lower_range);
	  destroy_font(upper_range);
	  destroy_font(capitals);
	  destroy_font(tempfont);

RETURN VALUE

       Returns a pointer to the new font or NULL on error. Remember that you are responsible for destroying the font when you are finished with it
       to avoid memory leaks.

SEE ALSO

       extract_font_range(3alleg4), is_trans_font(3alleg4), is_color_font(3alleg4), is_mono_font(3alleg4), exfont(3alleg4)

Allegro 							   version 4.4.2					      merge_fonts(3alleg4)

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

AWK embeded PERL

Discussion started by: bionicfysh

2. Shell Programming and Scripting

awk to perl convert

Discussion started by: jaganadh

3. Shell Programming and Scripting

awk command with PERL

Discussion started by: kmkbuddy_1983

4. Shell Programming and Scripting

awk or perl

Discussion started by: mmoses