Perl: added to an element Post: 302634389

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl delete an element from array

Probably I am not seeing it or I am not using the "delete" correctly I had the following codes but it does not work for me #!/bin/perl -w ... @sysFile1 = (a_b, a_c, a_d); @sysFile2 = (a_c, a_e, b_f); foreach $line1 (@sysFile1){ trim(\$line1); (my $tmp1, my $tmp2) = split/_/,...

2. Shell Programming and Scripting

Remove an element from an array in PERL

Hello guys, I have the following question. Consider the following code in PERL for($xeAnumber=0; $xeAnumber<@xeAnumber; $xeAnumber++) { if(@xeAnumber==@final_file) { @final_file=@xeTimeStamp; }...

3. Shell Programming and Scripting

Perl question - print last element in a hash?

I am modifying someone else's code. There is a foreach statement printing the contents of a hash. Can someone give me an example of printing the last element in a hash? The output currently is A B C D E I want the output to be E

4. Shell Programming and Scripting

Perl Foreach add "4" to the end of each element

I wrote the following script configuring cisco router:#!/usr/bin/perl use strict; use warnings; use Getopt::Long; use Opsware::NAS::Connect; my @IP = split(/\./,"$tc_device_ip$"); my $O3 = $IP; my($host, $port, $user, $pass) =...

5. Shell Programming and Scripting

Perl: One action if an element doesn't exist in array

Hello, I want to run one (not multiple) action if an element doesn't exist in array. for example: @array = (1..10); foreach $el (@array) { if ($el != 11) { print "number not found\n"; } } the output of this simple script: number not found

6. Shell Programming and Scripting

previous element in the array perl

Hi, How to get previous/next element in the array perl Example @queue = (1, 2 ,3 , 4); I want to get value of 1 and 2, or, 2 and 3, or 3 and 4...etc and compare to value which one is greater to do that I need to get previous and next element of array ?

7. UNIX for Advanced & Expert Users

Perl XML::DOM: How to test if element exists?

Hi, I'm trying to write a script for some xml file handling, but I'm not getting too far with it. I've got the following xml content <?xml version="1.0" encoding="UTF-8"?> <Test xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" > <Operation name="OPER1"> <Action name="ACTION1">...

8. Shell Programming and Scripting

Find if XML element has a matching required element

I want to check if every <Part> element has corresponding <Description> in this sample XML. ....<Lot Of XML> <Inv lineNumber="2"> <Item> ...

9. Shell Programming and Scripting

Print the row element till the next row element appear in a column

Hi all I have file with columns F3 pathway CPS F2 H2 H4 H5 H6 no pathway CMP H7 H8 H9 H10 My expected output is F3 pathway CPS F2 pathway CPS

10. Shell Programming and Scripting

Perl: How to check whether my array contains element x

Hi All, I am new to perl I am stuck in simple problem I need your help I want to define a subroutine. sub check_if_entity_exists(@array_to_be_checked,$entityName) I have array as http-listener-1 http-listener-2 http-listener-3 http-listener-4 If i send http-listener-3 my...

LEARN ABOUT SUSE

ttk_image

ttk_image(n)							 Tk Themed Widget						      ttk_image(n)

__________________________________________________________________________________________________________________________________________________

NAME

       ttk_image - Define an element based on an image

SYNOPSIS

       ttk::style element create name image imageSpec ?options?
_________________________________________________________________

DESCRIPTION

       The  image  element  factory creates a new element in the current theme whose visual appearance is determined by Tk images.  imageSpec is a
       list of one or more elements.  The first element is the default image name.  The rest of the list is a sequence of statespec / value  pairs
       specifying other images to use when the element is in a particular state or combination of states.

OPTIONS

       Valid options are:

       -border padding
	      padding  is a list of up to four integers, specifying the left, top, right, and bottom borders, respectively.  See IMAGE STRETCHING,
	      below.

       -height height
	      Specifies a minimum height for the element.  If less than zero, the base image's height is used as a default.

       -padding padding
	      Specifies the element's interior padding.  Defaults to -border if not specified.

       -sticky spec
	      Specifies how the image is placed within the final parcel.  spec contains zero or more characters "n", "s", "w", or "e".

       -width width
	      Specifies a minimum width for the element.  If less than zero, the base image's width is used as a default.

IMAGE STRETCHING

       If the element's allocated parcel is larger than the image, the image will be placed in the parcel based on the	-sticky  option.   If  the
       image  needs to stretch horizontally (i.e., -sticky ew) or vertically (-sticky ns), subregions of the image are replicated to fill the par-
       cel based on the -border option.  The -border divides the image into 9 regions: four fixed corners, top and left edges (which may be  tiled
       horizontally), left and right edges (which may be tiled vertically), and the central area (which may be tiled in both directions).

EXAMPLE

	      set img1 [image create photo -file button.png]
	      set img2 [image create photo -file button-pressed.png]
	      set img3 [image create photo -file button-active.png]
	      style element create Button.button image 
		  [list $img1  pressed $img2  active $img3] 
		  -border {2 4} -sticky we

SEE ALSO

       ttk::intro(n), ttk::style(n), ttk_vsapi(n), image(n), photo(n)

KEYWORDS

       style, theme, appearance, pixmap theme, image

Tk									8.5							      ttk_image(n)