Read up on eval in [perlfunc].

Short answer:

Block

eval { die "You commie!" };
[download]

String

my $death = 'die';
eval "$death \"You commie!\";"
[download]