Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Elsif not working in perl
Top Forums Shell Programming and Scripting Elsif not working in perl Post 302924342 by SriniShoo on Saturday 8th of November 2014 02:46:31 AM
Old 11-08-2014
2 corrections...
1. open file for reading
2. doesn't match condition
Code:
    open (INFO, "<temp.txt") or die;
    while (<INFO>) {
      if ($_ =~ /ipwr/) {
             $pline = $_;
      }elsif ($_ !~ /unknown/) {
             print "$pline";
             print "$_";
      }
    }
    close INFO;

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Bourne Shell: if elsif question

Hi All, Must be something obvious I am missing, but the simple script below doesn't work. #!/bin/sh x=4 if then echo "x is $x" elsif then echo "x is greater than 4" else echo "x is less than 4" fi When I run this script, I get the error message: 7: Syntax error... (3 Replies)
Discussion started by: leostar_10
3 Replies

2. Shell Programming and Scripting

working with other programs in perl

Hi, I'm still new to perl, and I'm trying to figure out how to work with data output from another program. For example, from a command line I can run "foo -xyz" and it will produce the output I am looking for, which is several lines of text that I will then parse and manipulate within the perl... (6 Replies)
Discussion started by: Decoy
6 Replies

3. Shell Programming and Scripting

perl if elsif statements

I have having problems with an IF statement in my perl script: if ($model eq "N\\A") {} elsif ($kernel =~ m/xen/) { $model = ("Virtual Machine\n")}; What i am trying to accomplish is if the model is set to "N\A" and the kernel variable has xen somewhere in it i would like to change... (3 Replies)
Discussion started by: insania
3 Replies

4. Shell Programming and Scripting

Method isSuccess not working right perl

Good morning all.... I have been learning Perl for about 2 months now and I guess I am getting there as much as I can however I am really stuck. I have a Perl script called postEvent.pl which uses a package called event.pm. PostEvent.pl depends on a meithod inside event.pm called isSuccess to... (0 Replies)
Discussion started by: LRoberts
0 Replies

5. UNIX for Dummies Questions & Answers

Perl script not working

Hi Experts!! I have written a very simple script in perl.The script is : $ cat 1.pl #!/usr/bin/perl print "Hi there!\n"; When i ran the above perl script it is showing the following error: $ perl 1.pl -ksh: cd: bad substitution Can anybody,help on this ....as why this script is... (1 Reply)
Discussion started by: Amey Joshi
1 Replies

6. Shell Programming and Scripting

\K in perl not working

Hi All, I have just started learning perl and was working on my one-liners tips and tricks. Instead of using the below command : perl -lape 's/(^From:).*/$1 Nelson Elhage <nelhage\@ksplice.com>/' i tried using the \k command using the below command but it gave no results: perl -lape... (2 Replies)
Discussion started by: kunwar
2 Replies

7. Shell Programming and Scripting

perl if else if loop not working

I am trying to work with a text file which has following format and trying ti run if elseif loop but fails. Any help is appreciated 289B ship N-grp 123 289C ship N-grp 123 289D ship N-grp 123 2CE1 flight N-grp 123 2CE2 flight N-grp 123 2CE3 flight N-grp 123 2CE4 flight N-grp 123 2DAF... (4 Replies)
Discussion started by: dynamax
4 Replies

8. Shell Programming and Scripting

using variables in perl not working

sdcprd@dotstoas110:$ echo $F2 1327332411 this works ---------- sdcprd@dotstoas110:$ perl -MPOSIX -le 'print strftime ("%m%d%y",localtime (1327332411))' 012312 <<<< correct date this doesnt ----------- sdcprd@dotstoas110:$ perl -MPOSIX -le 'print strftime ("%m%d%y",localtime... (10 Replies)
Discussion started by: aliyesami
10 Replies

9. Shell Programming and Scripting

IF-THEN-ELSE in PERL not working

Guys, i was trying a simple if-then-else statement in perl; but not getting any success in that. can you please help, where i am wrong. I tried $diff variable with double quotes as well, but no go. $region = $ARGV; $diff = $ARGV; if ; then ($date) = split(' ', `ssh -xC $san cat... (2 Replies)
Discussion started by: sdosanjh
2 Replies

10. Shell Programming and Scripting

Perl Net::IP not working

Experts - I have a snippet of code I can't figure out. I was hoping someone could help me here. I have a file of IPv6 address that I need to format correct. Example in: 2620:0:2d0:200::7 2620:0:2d0:200:a0:c 2620:0a:3f0:200:a0:c I need to convert them to:... (3 Replies)
Discussion started by: timj123
3 Replies

LEARN ABOUT DEBIAN

keyhead

keyhead(1)						      General Commands Manual							keyhead(1)

Name
       keyhead - Change FITS or IRAF header keyword names

Synopsis
       keyhead [-hknv] <FITS or IRAF file> kw1=kw1a kw2=kwd2a ... kwn=kwdna

Description
       Change the names of keywords in FITS or IRAF image headers.  Each current image keyword whose entry is to be modified should be followed by
       an equal sign and a second keyword, with no intervening spaces.	If the -r option is used, the value of the second keyword is transfered to
       that  of the first. Otherwise, the name of the first keyword is changed to the second keyword.  To change keywords in a list of files, sub-
       stitute @<listfile> for the file names on the command line.  To change a lot of keywords, put them, one pair separated by an = sign with no
       spaces  per  line, in a file and substitute @<keylistfile> on the command line.	If two @ commands are present, the program will figure out
       which contains file names and which contains keywords.  Lines in a keyword list file which do not contain an = are ignored.

Options
       -h     Write HISTORY line into output header with sethead version, current date and time, and names of keywords set.

       -k     Write KEYHEAD keyword into output header with the keyhead version, current date and time, and names  of  keywords  whose	names  are
	      changed.	If a KEYHEAD keyword already exists, move the old value to a HISTORY line before writing the new value

       -n     Write a new file with an added "e" before the extension.

       -r letter
	      Replace  value of 1st keyword with value of 2nd keyword instead of changing the name of the 1st keyword to the 2nd keyword.  The 2nd
	      keyword remains in the header.  If the 1st keyword does not exist in the header, it is created.

       -v     Print confirmations of each keyword change.

Web Page
       http://tdc-www.harvard.edu/software/wcstools/keyhead.html

Author
       Doug Mink, SAO (dmink@cfa.harvard.edu)

6 July 2001							     WCSTools								keyhead(1)
All times are GMT -4. The time now is 10:10 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy