Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Perl delete an element from array
Top Forums Shell Programming and Scripting Perl delete an element from array Post 302103318 by Perderabo on Wednesday 17th of January 2007 08:16:42 PM
Old 01-17-2007
Try this little script and post the results...
Code:
$ cat del.pl
#! /usr/local/bin/perl -w

print "perl version is ", $],  "\n";

@array=(a_b, a_c, a_d);

for ($index=0; $index <= $#array; $index++) {
        if (exists $array[$index])  {
                print "index = ", $index, "  element = ", $array[$index], "\n";
        } else {
                print "index = ", $index, "  element is not there", "\n";
        }
}

delete $array[1];

for ($index=0; $index <= $#array; $index++) {
        if (exists $array[$index])  {
                print "index = ", $index, "  element = ", $array[$index], "\n";
        } else {
                print "index = ", $index, "  element is not there", "\n";
        }

}

$ ./del.pl
perl version is 5.006001
index = 0  element = a_b
index = 1  element = a_c
index = 2  element = a_d
index = 0  element = a_b
index = 1  element is not there
index = 2  element = a_d
$

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

accessing my first element of array

Hello everyonel, I have an array set like so num=4 read name arr=name I go through while loop to assign different values to different array element from 1 to 4. when I try to access the FIRST element of the array I get the last one first. Like if I say ${arr} it will show the last element... (4 Replies)
Discussion started by: afadaghi
4 Replies

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 Replies)
Discussion started by: chriss_58
3 Replies

3. Shell Programming and Scripting

Shift array element

I want to delete and 0th element of array in shell scrpit and also shift all others to one level up. (2 Replies)
Discussion started by: darshakraut
2 Replies

4. Shell Programming and Scripting

remove an element from array

I need to remove an element from the below array variable TABLENAME. #!/bin/ksh set -A TABLENAME "mirf roxar keke mirs" echo "the array is ${TABLENAME}" If i need to remove say keke and have the final TABLENAME as below, how this could be achieved. Pls throw some light. echo "Modified... (3 Replies)
Discussion started by: michaelrozar17
3 Replies

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 (3 Replies)
Discussion started by: ahmed_zaher
3 Replies

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 ? (1 Reply)
Discussion started by: guidely
1 Replies

7. Shell Programming and Scripting

Delete lines in an array Using perl

im having an array @check which contains text ..i want to open the array and i have to delete lines starting from a word called "check1" till "check2" for eg:- check1 Use descriptive titles when posting. For example, do not post questions with subjects like "Help Me!", "Urgent!!" or "Doubt".... (0 Replies)
Discussion started by: rajkrishna89
0 Replies

8. Programming

How to delete a duplicate element from below array.

Hello forum , Please solve the below queery. A sorted array which has repated elements. A = {1,2,3,3,4,5,5,5,6,9,9} i want to delete the duplicate elements and to genrate a new array. i need the array sholud be like this A = {1,2,3,4,5,6,9}. Please write the piece of code... (4 Replies)
Discussion started by: workforsiva
4 Replies

9. 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... (1 Reply)
Discussion started by: javaholics
1 Replies

10. UNIX for Advanced & Expert Users

Array Element

This question is for someone that's more familiar with Array Element. I need to know if the maximum array element that can be assigned is 1024 and if its so, Is there a workaround solution when the counter exceeded 1024? param_array="$param_nam" counter=$counter+1 #to avoid space... (3 Replies)
Discussion started by: cumeh1624
3 Replies

LEARN ABOUT DEBIAN

weather::com::uvindex

Weather::Com::UVIndex(3pm)				User Contributed Perl Documentation				Weather::Com::UVIndex(3pm)

NAME

       Weather::Com::UVIndex - class containing the uv index data

SYNOPSIS

	 #!/usr/bin/perl -w
	 use Weather::Com::Finder;

	 # you have to fill in your ids from weather.com here
	 my $PartnerId	= 'somepartnerid';
	 my $LicenseKey = 'mylicense';

	 my %weatherargs = (
	       'partner_id' => $PartnerId,
	       'license'    => $LicenseKey,
	       'language'   => 'de',
	 );

	 my $weather_finder = Weather::Com::Finder->new(%weatherargs);

	 my @locations = $weather_finder->find('Heidelberg');

	 my $currconditions = $locations[0]->current_conditions();

	 print "The current uv index is ", $currconditions->uv_index()->index(), "
";
	 print "This is relatively ", $currconditions->uv_index()->description(), "
";

DESCRIPTION

       Via Weather::Com::UVIndex one can access the uv index and its description (whether it's high or low). An uv index is usually an object
       belonging to current conditions or to a forecast (not implemented yet).

       This class will not be updated automatically with each call to one of its methods. You need to call the "uv_index()" method of the parent
       object again to update your object.

CONSTRUCTOR

       You usually would not construct an object of this class yourself.  This is implicitely done when you call the uv_index() method of one cur-
       rent conditions or forecast object.

METHODS

       index()

       Returns the uv index (number).

       description([$language])

       Returns the description whether this index is high or low.

       This description is translated if you specified the language option as argument while instantiating your Weather::Com::Finder.

       This attribute is dynamic language enabled.

AUTHOR

       Thomas Schnuecker, <thomas@schnuecker.de>

COPYRIGHT AND LICENSE

       Copyright (C) 2004-2007 by Thomas Schnuecker

       This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

       The data provided by weather.com and made accessible by this OO interface can be used for free under special terms.  Please have a look at
       the application programming guide of weather.com (<http://www.weather.com/services/xmloap.html>)!

perl v5.8.8							    2007-07-09						Weather::Com::UVIndex(3pm)
All times are GMT -4. The time now is 04:30 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy