use strict;
use warnings;

my $this = 'hello';
my $that = 'tata';

if(fc($this) eq fc($that)) {print "wtf\n"}

##</code><code>##

Undefined subroutine &main::fc called at try.pl line 7.