Array Perl

#!/usr/bin/perl -w
use strict;
print(('salt', 'vinegar', 'mustard', 'pepper')[2]);
print "\n";