issue with if loop in perl Post: 302156484

Sponsored Content

Top Forums Shell Programming and Scripting issue with if loop in perl Post 302156484 by cbkihong on Tuesday 8th of January 2008 08:40:35 AM

01-08-2008

Registered User

Quote:

Originally Posted by amitrajvarma

while (<FILE>) {

$t = 0;
if (/cp c2960-lanlitek9-mz \/tftpboot\/$u\/c2960-lanlitek9-mz/) {
$t = 1;
}

if ( $t == 1 ) {

print "$c2960[5]\n";
open(OUTFILE,">>$of1") || die "cud not write";
print OUTFILE "c2960-lanlitek9-mz\n";
close(OUTFILE);
last;

} elsif ( $t == 0 ) {

print "NO $c2960[5]\n";
open(OUTFILE,">>$of2") || die "cud not write";
print OUTFILE "c2960-lanlitek9-mz\n";
close(OUTFILE);
last;

} else { }

} ## end of while crypto log
close(FILE);

You still have not mentioned what is your expected behaviour. Please be reminded that your script is very customized and will not run on others' machines, you should provide enough information for others to help you.

Unless you provide us with your expectations, I will just offer some general advise:

As the if block depends on $t and in turn from the pattern matching above, you should first make sure the matching result is correct.

Next, if the file cannot be written into and shows 'cud not write', consider die'ing with

die $!

instead to have the exact error message printed for debug. I also advise you to print $of1 and $of2 and ensure the values are as expected, as I cannot understand why you chomp() a static string. It is harmless, but that does not make sense:

Code:

$of1="\/users\/$u\/success.txt";
$of2="\/users\/$u\/failed.txt";
chomp($of1);
chomp($of2);

cbkihong

View Public Profile for cbkihong

Find all posts by cbkihong

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Help With A For Loop Issue

I was wondering how I can modify this for loop, so it only loops through the filenames that do not have an ".old" extension. for filename in $(ls "$1") do echo $filename | grep '\.old$' > /dev/null if then mv $1/$filename $1/$filename.old fi done

2. Shell Programming and Scripting

while loop issue

Hi, Following is my code and the file FILE_LIST_EXCESS.txt has 40 file names in it while read LineIn do echo ${LineIn} `ftp -vin << END_INPUT >> ${PID}_DS_GET_Log.log 2>&1 open servername user userid password cd FileDir get ${LineIn} END_INPUT`...

3. Shell Programming and Scripting

loop issue

I have 2 files one of them has all the all mac addresses and the other one has all the ip addresses. Basically, I want to loop thru those 2 files and generate a configuration like below: host www184.domain.com { hardware ethernet 00:13:72:3B:B4:3A; fixed-address 192.168.0.184; }...

4. 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...

5. Shell Programming and Scripting

until loop issue.

Hi, my script is waiting for 3 files to come to a folder for 30 min but even when all the files arrive in the folder it's still waiting for these three files. Files can come with in 2 min and I want it to start processing them immediately after all the files arrive in the folder. until ; do...

6. Shell Programming and Scripting

for-while loop issue

sup experts..i had a script which was bugging me..was hoping someone could point out the issue here Input file: space separated 2 columns I wanted to print out the 2 columns after assigning them to variables ( bascially the same output but iterate through line by line ). The code worked...

7. Shell Programming and Scripting

Issue with using While loop

Hi, I am trying to move a file from remote server to local server and when the transfer completes successfully i call a script in remote server to remove the file which was successfully transferred. I do this by first getting the list of file in remote server and move the text file to local...

8. Shell Programming and Scripting

While Loop issue

Hi, i=0 t5=6000001 while do i=`expr $i + 1` t5=`expr $t5 + 1` echo $t5 done I am able to increment "col3" value but unable to get col1,col2 value. Input: t1=10001 t2=abc t3=ghkc

9. Shell Programming and Scripting

Issue with while loop?

Hi, I have prepared a script to search for backup file information on the Linux server. Script works fine for the most part except the echo statement inside an IF conditional block displays the message ''snapshot directory not found on xxxxx" even though the .snapshot directory is found a...

10. Shell Programming and Scripting

Issue with for loop

Hi Team, I have for loop in my shell script. Which basically loop through all files in the directory, When some files are in the directory it works just fine. But if there are no files at all..still the for loop try to execute. Please help. Below is the code. #!/bin/ksh echo "Program...

LEARN ABOUT DEBIAN

gst-convert

GST-CONVERT(1)							   User Commands						    GST-CONVERT(1)

NAME

       gst-convert - Smalltalk syntax converter and beautifier

DESCRIPTION

   Usage:
	      gst-convert [OPTION]... [INFILE [OUTFILE]] gst-convert [OPTION]... -o|--output OUTFILE INFILES

OPTIONS

       -q, --quiet
	      don't show any message

       -v, --verbose
	      print extra information while processing

       -f, --format=FORMAT
	      convert from given input format (supported formats are gst, gst2, sif, squeak)

       -F, --output-format=FORMAT convert to given output format (supported
	      formats are gst, gst2, squeak)

       -C, --class=REGEX
	      convert only classes matching REGEX

       -C, --class=+REGEX
	      in addition, convert classes matching REGEX

       -C, --class=-REGEX
	      do not convert classes matching REGEX

       -c, --category=REGEX
	      convert only classes whose category matches REGEX

       -c, --category=+REGEX
	      in addition, convert those whose category matches REGEX

       -c, --category=-REGEX
	      do not convert classes whose category matches REGEX

       -r, --rule='CODE->REPL'
	      look for CODE and replace it with REPL

       -o, --output OUTFILE
	      concatenate multiple input files into a single converted output file

       --help display this message and exit

       --version
	      print version information and exit

SEE ALSO

       The  full  documentation for gst-convert is maintained as a Texinfo manual.  If the info and gst-convert programs are properly installed at
       your site, the command

	      info gst

       should give you access to the complete manual.

gst-convert version 3.2.4					   December 2011						    GST-CONVERT(1)

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Help With A For Loop Issue

Discussion started by: ralts01

2. Shell Programming and Scripting

while loop issue

Discussion started by: mgirinath

3. Shell Programming and Scripting

loop issue

Discussion started by: kkkk

4. Shell Programming and Scripting

Perl - pass shell-vars into perl for input loop

Discussion started by: alex_5161