Sponsored Content
Top Forums Shell Programming and Scripting perl : question about defined() Post 302428223 by hcclnoodles on Wednesday 9th of June 2010 07:52:53 AM
Old 06-09-2010
perl : question about defined()

Hi there

rather than doing this
Code:
if (defined($new)) {
    unless (defined($hostname)) {
        print "ERROR: If using --new, you must define a hostname\n";
        exit 1;
    }
}


is there some way of doing a "notdefined" (i appreciate there is no such thing Smilie)


Code:
 if (defined($new) && notdefined($hostname)) {
        print "ERROR: If using --new, you must define a hostname\n"; 
        exit 1;
 }


any advise would be great
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

PERL Question

Can anyone tell me if the copy command in PERL has the same functionality as in KSH shell in UNIX or does it actually move the file ?? $cp_stat=system("cp $ENV{OLAMEBSDIR}/data/olam.ddabal$type $ENV{OLAMDIR}/balance/data/olam.ddabal$type.$HeaderDate"); (1 Reply)
Discussion started by: frank
1 Replies

2. Shell Programming and Scripting

PERL Question

I am new to perl. I have adopted some perl scripts that seem not to work 100%. I 've corrected such things as file sharing contention etc. What these perl scripts basically do is extract specific records for statistical reporting of authentication and authorization from syslog daemon local... (5 Replies)
Discussion started by: Gary Dunn
5 Replies

3. Shell Programming and Scripting

perl question

If I use 2 system commands in a script, will one finish before the next one starts? or will it start the first and the second at the same time? i.e. system("ps | grep rminer"); system("ls -al | grep 431"); (1 Reply)
Discussion started by: BG_JrAdmin
1 Replies

4. Shell Programming and Scripting

Perl Question

I have created some DTS packages in SQL server 2000. The packages map input .dbf files to corresponding tables in the database. When I try to run the package through Command prompt, it runs successfully and loads the data into tables. However same package when ran through perl gives different... (1 Reply)
Discussion started by: b.paramanatti
1 Replies

5. Shell Programming and Scripting

Is a Perl method defined?

In my code, I know I can write... if ( defined &test_sub ) { test_sub(); } else { print "Subroutine doesn't exist"; } This tests the existence of the test_sub subroutine without actually calling it. If, though, I replace test_sub with a package method... if ( defined... (1 Reply)
Discussion started by: JerryHone
1 Replies

6. Shell Programming and Scripting

PERL question

Hi I am new to PERL and need to add a line to the perl script which issues a system call if certain pattern exists in the file, for example: $system "my_command" if "my_pattern" exists in "my file" Can somebody help me with the syntax? Thanks (4 Replies)
Discussion started by: aoussenko
4 Replies

7. AIX

AIX : User Defined Authorizations Question

Hello everyone, We have got a Server say Testserver with AIX 6.1 running on it. We want to create user defined authorization for syslogd, ntpd and named . We don't want to use pre-defined authorization (aix.network.daemon). Is it possible to create an independent authorization for commands?... (1 Reply)
Discussion started by: coolr
1 Replies

8. Shell Programming and Scripting

Perl question

Hi All, I am new to Perl and got a real stupid question. We are trying to install the Date:Calc package for some calculations with dates.The security guys mentioned they won't install it as root in /usr/bin/perl but have asked us to install it in any directory and use it from there. Here's the... (2 Replies)
Discussion started by: nua7
2 Replies

9. Shell Programming and Scripting

Question about awk - create a user-defined variable

Hi, guys, The content of file is below (from <UNIX® Shells by Example Fourth Edition>): My code is below: gawk -F'' ' { OFS = "****"; $3 = "(904)"; $8 = $5 + $6 + $7; print } ' lab3.data The result is below: So, where is the $1? Why is the variable $8 located at the wired position? (3 Replies)
Discussion started by: franksunnn
3 Replies

10. Shell Programming and Scripting

Looping in Perl based on defined keys in Map

Hello All, I am writing the below script where it will connect to database and returns the results. #!/sw/gcm/perl510/bin/perl use SybaseC; &openConnection; &loadvalues; sub openConnection { $dbproc = new SybaseC(SYDB}, $ENV{DBDFLTUSR}, $ENV{DBDFLTPWD}); if... (2 Replies)
Discussion started by: filter
2 Replies
.::SWF::TextField(3pm)					User Contributed Perl Documentation				    .::SWF::TextField(3pm)

NAME
SWF::TextField - SWF TextField class SYNOPSIS
use SWF::TextField; $textfield = new SWF::TextField([$flags]); DESCRIPTION
Unlike SWF::Text objects, TextFields cannot be rotated, scaled non-proportionally, or skewed. However, TextFields can be used as form entries and they can use browser-defined fonts. NOTES
: TextField is implemented into Flash since Flash3. Most of features for TextFields are available since Flash4. Simple HTML-tags in TextField are possible since Flash5. METHODS
new SWF::TextField([$flags]); Creates a TextField object whose behaviour is dictated by "flags" (see also SWF::Constants): SWFTEXTFIELD_NOEDIT: Non-editable Textfiled SWFTEXTFIELD_PASSWORD: Obscure user input with astricts. SWFTEXTFIELD_DRAWBOX: Draw a border around TextField SWFTEXTFIELD_MULTILINE: TextFiels may contain multiple lines SWFTEXTFIELD_WORDWRAP: Warp text when text reaches TextField border SWFTEXTFIELD_NOSELECT: TextField is not selected when user clicks on it SWFTEXTFIELD_ALIGN_LEFT: Align text to the left SWFTEXTFIELD_ALIGN_RIGHT: Align text to the right SWFTEXTFIELD_ALIGN_CENTER: Align text to the center SWFTEXTFIELD_ALIGN_JUSTIFY: Justify text SWFTEXTFIELD_HTML: Add HTML markup string SWFTEXTFIELD_HASLENGTH: SWFTEXTFIELD_USEFONT: Want to embed font SWFTEXTFIELD_AUTOSIZE: Flags may be combined with the bitwise OR operation. For example: my $t = new SWF::TextField(SWFTEXTFIELD_MULTILINE | SWFTEXTFIELD_WORDWRAP); $textfield->addString($string) $textfield->addUTF8String($UTF8string) Add $string to TextField. Text is appended to the existing text. $textfield->align($alignment) $textfield->setAlignment($alignment) Set the alignment of the text in the textfield. Possible values are SWFTEXTFIELD_ALIGN_LEFT SWFTEXTFIELD_ALIGN_RIGHT SWFTEXTFIELD_ALIGN_CENTER SWFTEXTFIELD_ALIGN_JUSTIFY By default a SWF::TextField ist left aligned. $textfield->setBounds($width, $height) Sets the width and height of the textfield. $textfield->setColor($red, $green, $blue [, $alpha]) Set the color of the text. An 8 bit value for each parameter. You can use the hex or decimal notation. Even mixed. $tf->setColor(0xcc,0,0x33); $tf->setColor(204,0,51,255); $textfield->setFont($font) Sets an SWF::Font object -$font- to be used in the TextField. $textfield->setPadding($padding) Set TextField padding. $textfield->setHeight($height) Set the height of font in your textfield. $textfield->setIndentation($indentation) Set the indentation of the first line of a paragraph. $textfield->setLeftMargin($left) Sets the left margin of the textfield. $textfield->setRightMargin($right) Sets the right margin of the textfield. $textfield->setMargins($left, $right) Sets left and right margins of $textfield. $textfield->setLineSpacing($linespacing) Sets the space between lines. $textfield->setName($name) $textfield->setVariableName($name) Assigns a name to the TextField which could be used to reference the TextField within ActionScript. $textfield->addChars($string) $textfield->addUTF8Chars($UTF8string) Adds characters to a font that will be available within a textfield. $textfield->setFlags($flags) Set TextField behaviour by "flags" (see above new SWF::TextField) For example: $textfield->setFlags(SWFTEXTFIELD_PASSWORD); $textfield->setLength($length) Sets limit for user input size to $length. $textfield->setFieldHeight($height) Sets height limit for visible part of text field. If $height is set to 0, the height is calculated by used font, see setHeight() method. AUTHOR
Soheil Seyfaie (soheil at users.sourceforge.net). SEE ALSO
SWF, SWF::Action, SWF::Button, SWF::Constants, SWF::DisplayItem, SWF::Font, SWF::Movie, SWF::MovieCip, SWF::Text perl v5.14.2 2011-10-26 .::SWF::TextField(3pm)
All times are GMT -4. The time now is 03:57 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy