Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: How to use parameter with perl function?
Top Forums Shell Programming and Scripting How to use parameter with perl function? Post 302421033 by durden_tyler on Thursday 13th of May 2010 08:26:29 AM
Old 05-13-2010
Maybe like this ?

Code:
$
$
$ cat -n f4
     1  DOCSTART
     2  DFSDF
     3  NAME FIRSTNAME
     4  ADDRESS
     5  DSAFFD
     6  DOCEND
     7  DOCSTART
     8  VEDFDSF
     9  NAME KRAI
    10  ADDRESS
    11  SDFDSG
    12  DOCEND
    13  DOCSTART
    14  LOUI
    15  NAME ROBERT
    16  ADDRESS
    17  GHHW
    18  DOCEND
    19  DOCSTART
    20  YYUI
    21  NAME MARK
    22  ADDRESS
    23  LKJL;
    24  DOCEND
    25  DOCSTART
    26  SAFD
    27  NAME BEN
    28  ADDRESS
    29  8OIP
    30  DOCEND
$
$
$ perl -lne '$/="DOCEND"; print $_."DOCEND" if /MARK|KRAI/' f4
 
DOCSTART
VEDFDSF
NAME KRAI
ADDRESS
SDFDSG
DOCEND
 
DOCSTART
YYUI
NAME MARK
ADDRESS
LKJL;
DOCEND
$
$

Or this -

Code:
$
$ perl -lne 'BEGIN {$/="DOCEND"; $ACC="MARK|KRAI"} print $_."DOCEND" if /$ACC/' f4
 
DOCSTART
VEDFDSF
NAME KRAI
ADDRESS
SDFDSG
DOCEND
 
DOCSTART
YYUI
NAME MARK
ADDRESS
LKJL;
DOCEND
$
$

tyler_durden
 

10 More Discussions You Might Find Interesting

1. UNIX for Advanced & Expert Users

Parameter passing in a function

I need to pass a parameter to a function in a script. My parameter is a string. When I display the parameter within my function, I only get the first word from string I pass in. How can I make the function receive the whole string (and not terminate at the first space it encounters)?. part of... (2 Replies)
Discussion started by: fastgoon
2 Replies

2. Shell Programming and Scripting

function parameter

Hi, i have this code : awk -v s=string_to_find 'BEGIN{ n="" } { if ($0 ~ /FEATURE TESTED /) { n=$0 } if (index($0,s)!=0) { if (n!="") print n n=="" } }' $file1 > $file2 (4 Replies)
Discussion started by: kamel.seg
4 Replies

3. Shell Programming and Scripting

KSH list as function parameter

Hello, Could anyone help me with some KSH syntax? I'm trying to pass a list as a function parameter in a KSH? For example I have code like this: print_counter() { N=$1 C=$2 for A in $C; do echo "This is $N number $A" done } NAME=BRICK COUNT=" 1 2 3 4" ... (2 Replies)
Discussion started by: pn8830
2 Replies

4. Shell Programming and Scripting

pass parameter to function

HI all I have a code like ############################################## minyear() { curryear=$1 echo $curryear } ##Main Program ## minyear exit ####### when i execute "sh scriptname 2005" output should be like 2005 but the output is blank. I guess i need to pass parameter to... (3 Replies)
Discussion started by: vasuarjula
3 Replies

5. Solaris

function parameter in unix

Hi, How to use a function with passing value as a parameter in unix ? With Regards (7 Replies)
Discussion started by: milink
7 Replies

6. UNIX for Dummies Questions & Answers

function parameter issue

hi, i have a function say "mask". i'm passing parameters to the function like file_name \$1 |. inside the function i'm naming the second parameter as position (i.e value of position will be "$1"). i'm passing the position's value like " $position=a" But it is nor picking the value "$1".... (5 Replies)
Discussion started by: amar1003
5 Replies

7. Shell Programming and Scripting

Pass command as a function parameter

Hi guys, can someome help with this question, I have defined a function that takes a command as a parameter, but when the command is executed from the function it will throw errors because what I believe is a special character escaping issue. I tried using the backslash to escape the pipe | and >... (2 Replies)
Discussion started by: marouanix
2 Replies

8. Shell Programming and Scripting

How to get the parameter value from the parameter file in perl?

hi all, i have a parameter file of following format, i want a method which can get the value of specific parameter. parameter file format: <Parameter Name="FileLocationWindows"> <Description> The directory location of the logger file. ... (1 Reply)
Discussion started by: laxmikant.hcl
1 Replies

9. Shell Programming and Scripting

Passing command as a function parameter

Hi All, Just trying to implement the below shell script using AIX ksh shell. myfunc { eval "$*" } CMD='ls -la /etc/hosts | awk '{print $9"|"$5}'' myfunc $CMD Keeping getting "|}: not found" errors, any pointers would greatly be appreciated. Kind Regards Ed Please... (2 Replies)
Discussion started by: eo29
2 Replies

10. Shell Programming and Scripting

How to pass function parameter to do loop?

Hi All, I have created one function for KSH and was running well with one parameter input since I just had to use $1 to get the parameter. Now I want to do loop for each parameter(actually filenames) . I have try to use do loop, but $i does not resolve to parameter instead it resolves to 1,... (5 Replies)
Discussion started by: mysocks
5 Replies

LEARN ABOUT DEBIAN

gtk2::toolshell

Gtk2::ToolShell(3pm)					User Contributed Perl Documentation				      Gtk2::ToolShell(3pm)

NAME

       Gtk2::ToolShell - wrapper for GtkToolShell

HIERARCHY

	 Glib::Interface
	 +----Gtk2::ToolShell

METHODS

   ellipsizemode = $shell->get_ellipsize_mode
       Since: gtk+ 2.20

   iconsize = $shell->get_icon_size
   orientation = $shell->get_orientation
   $shell->rebuild_menu
   reliefstyle = $shell->get_relief_style
   toolbarstyle = $shell->get_style
   double = $shell->get_text_alignment
       Since: gtk+ 2.20

   orientation = $shell->get_text_orientation
       Since: gtk+ 2.20

   sizegroup or undef = $shell->get_text_size_group
       Since: gtk+ 2.20

ENUMS AND FLAGS

   enum Gtk2::IconSize
       o   'invalid' / 'GTK_ICON_SIZE_INVALID'

       o   'menu' / 'GTK_ICON_SIZE_MENU'

       o   'small-toolbar' / 'GTK_ICON_SIZE_SMALL_TOOLBAR'

       o   'large-toolbar' / 'GTK_ICON_SIZE_LARGE_TOOLBAR'

       o   'button' / 'GTK_ICON_SIZE_BUTTON'

       o   'dnd' / 'GTK_ICON_SIZE_DND'

       o   'dialog' / 'GTK_ICON_SIZE_DIALOG'

   enum Gtk2::Orientation
       o   'horizontal' / 'GTK_ORIENTATION_HORIZONTAL'

       o   'vertical' / 'GTK_ORIENTATION_VERTICAL'

   enum Gtk2::ReliefStyle
       o   'normal' / 'GTK_RELIEF_NORMAL'

       o   'half' / 'GTK_RELIEF_HALF'

       o   'none' / 'GTK_RELIEF_NONE'

   enum Gtk2::ToolbarStyle
       o   'icons' / 'GTK_TOOLBAR_ICONS'

       o   'text' / 'GTK_TOOLBAR_TEXT'

       o   'both' / 'GTK_TOOLBAR_BOTH'

       o   'both-horiz' / 'GTK_TOOLBAR_BOTH_HORIZ'

   enum Pango::EllipsizeMode
       o   'none' / 'PANGO_ELLIPSIZE_NONE'

       o   'start' / 'PANGO_ELLIPSIZE_START'

       o   'middle' / 'PANGO_ELLIPSIZE_MIDDLE'

       o   'end' / 'PANGO_ELLIPSIZE_END'

SEE ALSO

       Gtk2, Glib::Interface

COPYRIGHT

       Copyright (C) 2003-2011 by the gtk2-perl team.

       This software is licensed under the LGPL.  See Gtk2 for a full notice.

perl v5.14.2							    2012-05-27						      Gtk2::ToolShell(3pm)
All times are GMT -4. The time now is 01:27 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy