my $string2 = '5422 Texas Home Luggage Tag 6 @ $ 3.95 = $ 23.70'; print "identical strings \n" if $_ eq $string2;