The Great Idea 

• By changing this:

<code><![CDATA[
  use SomeModule;

  # TODO: get timeout values from config file

  my $object = SomeModule->new(Timeout => 2);
]]></code>

• Into this:

<code syntax="perl"><![CDATA[
  use SomeModule;

  # TODO: get timeout values from config file

  my $object = SomeModule->new(Timeout => 2);
]]></code>