What does splice function do in Perl ?

The first argument for splice is an array. Then second is the offset. The offset is the index
number of the list element to begin splicing at. In this case it is 1. Then
comes the number of elements to remove
@names=("Muriel","Sarah","Susanne","Gavin");
&look;
sub look {
print "Names : @names\n";
print "The Splice Girls are: @middle\n";
}