use warnings;
use strict;

##</code><code>##

Scalar value @in_items[0] better written as $in_items[0]

##</code><code>##

chomp (my @in_items = @_);