Select Code to Download

my $str_a = 'Foo';
my $letter = substr $str_a, 0, 1;
...
    next if $letter eq substr $str_b, 0, 1;
    expensive_function($str_a , $str_b);
}