Select Code to Download

Deleting an array element effectively returns that position of the arr
+ay to its initial, uninitialized state.  Subsequently testing for the
+ same element with exists() will return false.  Note that deleting ar
+ray elements in the middle of an array will not shift the index of th
+e ones after them down--use splice() for that.  See "exists".

#!/usr/bin/perl -w

...
__END__
length = 4
length = 4

first
second
third
fourth

use Tie::File;

...
$lines[1] = $lines[0];
shift(@lines);
untie @lines;

 
first
third
fourth