This may or may not have been posted before, but someone mentioned in chat just now that it would be nice if delete in array context worked like splicing out the element. I figured, why not write a small function to do that? Here it is, with all the test situations I could think of covered:

use strict;
use warnings;

my @arr;
for (0, 2, 4, 4.1, 5, -1, -5, -6) {
    @arr = (0,1,2,3,4);
    deleteA(\@arr, $_);
    print "Deleted $_: @arr\n";
}

sub deleteA {
    my ($arr, $i) = @_;

    return if int $i > $#$arr ||
              int $i < $#$arr * -1 - 1;
    splice(@$arr, $i, 1);
}

[download]

I suppose you could just use splice directly, but the function takes care of things that cause splice to generate an error, like falling outside of bounds.

In reply to Delete for array: by TJPride

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.