use strict; my $lookfor; if ( $line =~ /TC/g ) { $lookfor = "TC"; } else { $lookfor = "26"; } #### use strict; my $lookfor = ( $line =~ /TC/g ) ? "TC" : "26";