I have a file with a list of config files numbered on the lefthand side 1-300. I need to have bash read each lines number and assign it to a variable so it can be chosen by the user called by the script later.
Ex. 1 some data
2 something else
3 more stuff
which number do you... (1 Reply)
I am working on a perl script that is used to update a list of hosts to a certain file but I am having an issue when I try to perform a check to make sure the user enters valid information. The following is what I have currently written for the script:
IPINPUT:
print "Enter IP Address: ";... (2 Replies)
Hi guys, I am working on a server where there are many users. The user names end in a 1 or a 2. I want to write a bash script that will say which users are in which group and was wondering if I could get some help. The only part I am unsure of is how to check if it ends in the number.
Here's... (2 Replies)
I am looking for perl code to get following o/p. If a line has more than 7 fields then value in field 7 onwards is BHA_GRP1, BHA_GRP2, BHA_GRP3, BHA_GRP4 etc.
Here is example of what I am trying to achieve.
INPUT File:
VAH NIC_TYPE CONFIG SIZE_GB PILO KOM BHA_GRP1 BHA_GRP2 BHA_GRP3......
2... (1 Reply)
I have a variable $max = -3;
It can be $max = +3;
I need to check if this variable is a positive/negative value.
if its positive, should print "positive" if not "negative"
How can this be done?
Thanks in advance (2 Replies)
Dear Perl users,
I need your help to solve my problem below.
I want to print the sequence number without missing number within the range.
E.g. my sequence number :
1 2 3 4 5 6 7 8 11 12 13 14
my desired output:
1 -8 , 11-14
my code below but still problem with the result:
1 - 14
1 -... (2 Replies)
Hi Experts,
I am checking how to get day in Perl.
If it is “Monday” I need to process…below is the pseudo code.
Can you please prove the code for below condition.
if (today=="Monday" )
{
while (current_time LESS THAN 9:01 AM)
... (1 Reply)
Discussion started by: ajaypatil_am
1 Replies
LEARN ABOUT CENTOS
tk::tkvars
tkvars(3) User Contributed Perl Documentation tkvars(3)NAME
tkvars - Variables used or set by Tk
DESCRIPTION
The following perl variables are either set or used by Tk at various times in its execution. (For a list of variables used by perl see
perlvar.)
$Tk::library
This variable holds the file name for a directory containing the modules related to Tk. These modules include an initialization file
that is normally processed whenever a Tk application starts up, plus other files containing procedures that implement default behaviors
for widgets. The initial value of $Tk::library is set when Tk is added to an interpreter; this is done by searching searching for a
directory named Tk in the directory where the file Tk.pm, or the first directory Tk in @INC.
The TK_LIBRARY environment variable used by Tcl/Tk is not supported by perl/Tk. Please use @INC to change where modules are searched.
Note: This is Tcl remnant. With perl it makes more sense to use @INC and %INC).
$Tk::patchLevel
Contains a decimal integer giving the current patch level for Tk. The patch level is incremented for each new release or patch, and it
uniquely identifies an official version of Tk.
Note: this is Tcl remnant. With perl it makes more sense to use $Tk::VERSION described below.
$Tk::strictMotif
This variable is set to zero by default. If an application sets it to one, then Tk attempts to adhere as closely as possible to Motif
look-and-feel standards. For example, active elements such as buttons and scrollbar sliders will not change color when the pointer
passes over them.
$Tk::VERSION
The variable holds the current version number of the perl/Tk release in the form major.minor. Major and minor are integers.
The major version number shows on which Tcl/Tk release perl/Tk is based. E.g., 402 means based on Tcls Tk 4.2. (Patchlevel of Tcls Tk
are not incorporated because perl/Tk tended to be ``ahead'' of them on some fixes and behind on others. The first digest of the major
version number increases in any Tk release that includes changes that are not backward compatible (i.e. whenever existing perl/Tk
applications and scripts may have to change to work with the new release).
The minor version depends on perl/Tk only. It uses the 'even'='stable', 'odd'='experimental' scheme that linux uses:
.0xx - inherently 'alpha'
.1xx - experimental 'beta'
.2xx - stable
.3xx - experimental
.4xx - stable
...
The minor version number increases with each new release of Tk, except that it resets to zero whenever the major version number
changes.
$Tk::version
The variable holds the current version number of the Tk library in the form major.minor. Major and minor are integers. The major
version number increases in any Tk release that includes changes that are not backward compatible (i.e. whenever existing Tk
applications and scripts may have to change to work with the new release). The minor version number increases with each new release of
Tk, except that it resets to zero whenever the major version number changes.
Note: this is Tcl remnant. With perl it makes more sense to use $Tk::VERSION described above.
KEYWORDS
variables, version
perl v5.16.3 2014-06-10 tkvars(3)