#!/usr/bin/perl

my $city = "Chicago";
my $cityState = "Chicago, IL";

if ( $cityState =~ /\$city+/) {
    print "They match!"; 
  } else {
    print "dont match";
  }