Sponsored Content
Top Forums UNIX for Advanced & Expert Users What does "__FD_PRN_" means in perl code ? Post 302539926 by itkamaraj on Tuesday 19th of July 2011 06:23:11 AM
Old 07-19-2011
Code:
 
$ ./test.pl 
ABC\(EFG

 
$ cat test.pl
#!/usr/bin/perl
$test = "ABC__FD_PRN_EFG";
$test =~ s/__FD_PRN_/\\(/g;
print "$test\n";

 

10 More Discussions You Might Find Interesting

1. UNIX for Advanced & Expert Users

Any idea what this counter means "tcpTimRetrans"

I am chasing an issue where I see drop packets, in order to dig the problem further I issue netstat -s -P tcp command which shows me the stats from the tcp perspective. In that stats I see a counter which is "tcpTimRetrans" which increments along with "tcpRetransSegs". When both of these counter... (3 Replies)
Discussion started by: purechgo
3 Replies

2. UNIX for Dummies Questions & Answers

file "pax_global_header" means what?

I'm using Red Hat 9.0, the kernel is 2.4.20-8, I want to update the kernel , go to www.kernel.org and then download the linux-2.4.37.7.tar.bz2 to /root # ll total 88576 -rw-r--r-- 1 root root 1057 Dec 1 03:23 anaconda-ks.cfg -rw-r--r-- 1 root root 13205 Dec ... (1 Reply)
Discussion started by: cqlouis
1 Replies

3. Shell Programming and Scripting

perl file, one line code include "length, rindex, substr", slow

Hi Everyone, # cat a.txt a;b;c;64O a;b;c;d;ee;f # cat a.pl #!/usr/bin/perl use strict; use warnings; my $tmp3 = ",,a,,b,,c,,d,,e,,f,,"; open(my $FA, "a.txt") or die "$!"; while(<$FA>) { chomp; my @tmp=split(/\;/, $_); if ( ($tmp =~ m/^(64O)/i) || ($tmp... (3 Replies)
Discussion started by: jimmy_y
3 Replies

4. Shell Programming and Scripting

What "-a" operator means in "if" statement

Hi I am trying to figure out what the following line does, I work in ksh88: ] && LIST="$big $LIST" Not sure what "-a" means in that case. Thanks a lot for any advice -A (1 Reply)
Discussion started by: aoussenko
1 Replies

5. Shell Programming and Scripting

awk command to replace ";" with "|" and ""|" at diferent places in line of file

Hi, I have line in input file as below: 3G_CENTRAL;INDONESIA_(M)_TELKOMSEL;SPECIAL_WORLD_GRP_7_FA_2_TELKOMSEL My expected output for line in the file must be : "1-Radon1-cMOC_deg"|"LDIndex"|"3G_CENTRAL|INDONESIA_(M)_TELKOMSEL"|LAST|"SPECIAL_WORLD_GRP_7_FA_2_TELKOMSEL" Can someone... (7 Replies)
Discussion started by: shis100
7 Replies

6. What is on Your Mind?

What does "Eris Free" means, from the acronym EFNET

Ok so I have searched google pretty exstensively to find this out, no luck so far . . . Basically I wanted to know what "Eris Free" means, from the acronym EFNET. I was thinking that Eris is generally to do with discordianism, but have so far only found it as a reference to... (2 Replies)
Discussion started by: U_C_Dispatj
2 Replies

7. Solaris

Means to check if some process is running on "n" number of machines

Team, I would like to know, if we have any command in Solaris to verify, if some process is listening on a port on a set of machines. for eg: Wrote the below script, and found that when a process is listening on that port, then it just waits there and doesnt come out. Rather, I would like... (6 Replies)
Discussion started by: msgforsunil
6 Replies

8. Shell Programming and Scripting

Bash script - Print an ascii file using specific font "Latin Modern Mono 12" "regular" "9"

Hello. System : opensuse leap 42.3 I have a bash script that build a text file. I would like the last command doing : print_cmd -o page-left=43 -o page-right=22 -o page-top=28 -o page-bottom=43 -o font=LatinModernMono12:regular:9 some_file.txt where : print_cmd ::= some printing... (1 Reply)
Discussion started by: jcdole
1 Replies

9. UNIX for Beginners Questions & Answers

Perl: Can someone please explain this code "sort { $a <=> $b } @unsorted"

@sorted = sort { $a <=> $b } @unsorted; I am having hard time understanding how this works? I know the output but interested to know the working. Thanks in advance. (2 Replies)
Discussion started by: Tanu
2 Replies

10. UNIX for Beginners Questions & Answers

What does "force devmap reload" as in "multipath -r" means for my system and stability of my system?

Cannot present unpresented disks back again. On a test server tried this as a solution "multipath -r" and it worked. Too worried to try it in production before I know all the information. Any info would be appreciated! Also some links to the documentation on this specific issue could help a... (1 Reply)
Discussion started by: jsteppe
1 Replies
JE::Code(3pm)						User Contributed Perl Documentation					     JE::Code(3pm)

NAME
JE::Code - ECMAScript parser and code executor for JE SYNOPSIS
use JE; $j = new JE; $code = $j->compile('1+1'); # returns a JE::Code object $code->execute; METHODS
$code->execute($this, $scope, $code_type); The "execute" method of a parse tree executes it. All the arguments are optional. The first argument will be the 'this' value of the execution context. The global object will be used if it is omitted or undef. The second argument is the scope chain. A scope chain containing just the global object will be used if it is omitted or undef. The third arg indicates the type of code. 0 or undef indicates global code. 1 means eval code (code called by JavaScript's "eval" function, which has nothing to do with JE's "eval" method, which runs global code). Variables created with "var" and function declarations inside eval code can be deleted, whereas such variables in global or function code cannot. A value of 2 means function code, which requires an explicit "return" statement for a value to be returned. If an error occurs, "undef" will be returned and $@ will contain the error message. If no error occurs, $@ will be a null string. $code->set_global( $thing ) You can transfer a JE::Code object to another JavaScript environment by setting the global object this way. You can also set it to "undef", if, for instance, you want to serialise the compiled code without serialising the entire JS environment. If you do that, you'll need to set the global object again before you can use the code object. FUNCTIONS
JE::Code::add_line_number($message, $code_object, $position) WARNING: The parameter list is still subject to change. This routine append a string such as 'at file, line 76.' to the error message passed to it, unless it ends with a line break already. $code_object is a code object as returned by JE's or JE::Parser's "parse" method. If it is omitted, the current value of $JE::Code::code will be used (this is set while JS code is running). If $JE::Code::code turns out to be undefined, then $message will be returned unchanged (this is subject to change; later I might make it use Carp to add a Perl file and line number). $position is the position within the source code, which will be used to determine the line number. If this is omitted, $JE::Code::pos will be used. EXPORTS
"add_line_number" can optionally be exported. SEE ALSO
JE perl v5.14.2 2012-03-18 JE::Code(3pm)
All times are GMT -4. The time now is 10:01 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy