#!/usr/bin/perl -w
use strict;

my @stuff = ("foo", 1, "3", "5", 8, "jerk", "bummer");
my $test = "1";

foreach(@stuff){
 print "Found!\n" if ("$test" eq "$_");
}