#!/usr/local/bin/perl use strict; my @array = ( 'account_trend','trend_report','revenuebytrafficker','ticketstatus','lostinventory','campaigndetail','campaignsummary','packagesummary','placementsummary','bookedbyaccount','bookedbysalesperson','accounttrends','salespersontrends','salessitetrend','placementperformance','packageperformance','forcastsummary'); my $value = 'reve*ker'; foreach (@array) { if ( grep (/$value/,$_) ) { print "Matched :$_:\n"; } }