perl if else if loop not working Post: 302523741

Sponsored Content

Top Forums Shell Programming and Scripting perl if else if loop not working Post 302523741 by dynamax on Thursday 19th of May 2011 03:51:21 PM

05-19-2011

Registered User

birei here is the code with line nos.

Code:

           sub freecnt{
            open (PEROUT, "<$grplst") || die ("can not open file!");
            while ($LINEIN3 =<PEROUT>)
            {
             chomp $LINEIN3;
            ($indid1, $a, $b, $c) = split(' ',$LINEIN3);
           # Check flight
             if (($LINEIN3 =~ "flight") && ($LINEIN3 =~ "air"))
                {
                   print "$grpid $indid1 ==> in free pool OK to use\n";
                }
           
           # Check ship
##Line 67           else  if (($LINEIN3 =~ 'ship') && ($LINEIN3 =~ 'N/Grp'))
              {
                      print "$grpid $indid1 ==> in free pool OK to use\n";
                }
           # Check road
##Line 72           else   if (($LINEIN3 =~ "road") && ($LINEIN3 =~ "N/Grp"))
              {
                     print "$grpid $indid1 ==> in free pool OK to use\n";
                }
           
            Check in any group
##Line 77               else
                 {
                   print "$grpid $indid1 ==>  NOT FOUND in Free Pool ---  Check Before Using\n";
              }
           }
           close (PEROUT);
           }

dynamax

View Public Profile for dynamax

Find all posts by dynamax

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Loop not working

Apologize if this is doesn't come under this group. I have a small script to find out users who last logged in to check there mail. (Tru 64 4.0, Netscape mail 3.6) -----> cat $1|awk -F: '$2=="SMTP-Accept" && $5~/@maildomain/ {s=$5;u++;las=substr($1)} END {for (i in u) {print...

2. Shell Programming and Scripting

if loop is not working

Hello i am trying to remove a line using an input file , but this depends upon user interaction here is the sample #!/bin/sh echo "Please enter whether you want to remove Profile" read value1 if ;then sed /movie/d temp.txt> temp3.txt else echo "Script didnot remove profile" fi ...

3. Shell Programming and Scripting

For loop not working...! :(

Could some one help me on this... For loop is working...! for x in $i do for y in $j do z=`echo $y | awk '{print $2}'` if then FS=`/usr/bin/echo $y` echo $FS >>$Basic_location/out.csv fi done CPRT="Cpoyright @ BTOIDCIM" done

4. UNIX for Dummies Questions & Answers

If then else loop not working

If then else segment of below code is not working. For each filename code is displaying output for if part as well as else part. Please help its urgent. for usercusttop in `echo ${filename}|sort|uniq|cut -c 1-${actualwordcount}` do ...

5. UNIX for Advanced & Expert Users

If loop is not working

The following piece of code is not running because it is fails to go inside the if condition. i want to create a directory if there is no directory in the input path. i am using Linux, by CENT. Please help. echo " Enter the path where you u want to extract the tar" read EXTRACT_PATH ls -ld...

6. Shell Programming and Scripting

Perl - pass shell-vars into perl for input loop

I need to process a file line-by-line using some value from a shell variable Something like:perl -p -e 's/$shell_srch/$shell_replace/g' input.txt I can't make the '-s' work in the '-p' or '-n' input loop (or couldn't find a syntaxis.) I have searched and found...

7. Shell Programming and Scripting

while loop not working

hi everyone i am facing a very strange problem . please help me why my while loop is not working. below is my code #!/bin/ksh file=RCMC_ABC_999_080924_210813.DAR echo ${file} value=001 count=10 echo "abc" echo ${count} value=$((${value} + 1 )) echo ${value} while ] do echo...

8. Shell Programming and Scripting

For loop not working

Hi All, For loop in ksh not working if it was given in the following method. simple script: for i in {1..4} do echo $i done Output: {1..4} Even below also not working :( Script: for (( c=1; c<=5; c++ )) do echo "Welcome $c times..." done Output: ./x.sh: 0403-057 Syntax error...

9. UNIX for Dummies Questions & Answers

for loop not working

Hi, I have ten different files to extract. so I thought for loop will help me. but it's not working for me. Please advice what I am doing wrong. for INCI in 1 2 3 4 5 6 7 8 9 10 do tar -xvf Update_INCI11.10.002_lnx86_1of10.tar done second file name is...

10. Shell Programming and Scripting

For-loop not working

Hello all, I would like to unzip some files with a for-loop. Is there anyone who could tell me how I should do this - in a correct way? for file in $(ls); do echo gzip -d < $file | tar xf -; done The problem is the pipe - I believe. But how could I do it? I need it for the command...

LEARN ABOUT X11R4

xkbkeysymentry

XkbKeySymEntry(3)						   XKB FUNCTIONS						 XkbKeySymEntry(3)

NAME

       XkbKeySymEntry -  Returns the keysym corresponding to shift level shift and group grp from the two-dimensional array of keysyms for the key
       corresponding to keycode

SYNOPSIS

       KeySym XkbKeySymEntry macro ( xkb, keycode, shift, grp )
	     XkbDescPtr xkb;
	     KeyCode keycode;
	     int shift;
	     int grp;

ARGUMENTS

       - xkb  Xkb description of interest

       - keycode
	      keycode of interest

       - shift
	      shift level of interest

       - grp  group of interest

DESCRIPTION

       The key width and number of groups associated with a key are used to form a small two-dimensional array of KeySyms for a  key.  This  array
       may be different sizes for different keys. The array for a single key is stored as a linear list, in row-major order. The arrays for all of
       the keys are stored in the syms field of the client map. There is one row for each group associated with a key  and  one  column  for  each
       level. The index corresponding to a given group and shift level is computed as:

	    idx = group_index * key_width + shift_level

       The offset field of the key_sym_map entry for a key is used to access the beginning of the array.

       XkbKeySymEntry  returns	the  keysym corresponding to shift level shift and group grp from the two-dimensional array of keysyms for the key
       corresponding to keycode.

X Version 11							   libX11 1.2.1 						 XkbKeySymEntry(3)

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Loop not working

Discussion started by: nitin

2. Shell Programming and Scripting

if loop is not working

Discussion started by: ranga27

3. Shell Programming and Scripting

For loop not working...! :(

Discussion started by: bullz26

4. UNIX for Dummies Questions & Answers

If then else loop not working

Discussion started by: findprakash