diff --git a/xt/benchmark.pl b/xt/benchmark.pl
index f618717..7caa1dc 100644
--- a/xt/benchmark.pl
+++ b/xt/benchmark.pl
@@ -40,6 +40,7 @@
 # Load example files
 my $file = rel2abs(catfile($f, '..', 't', 'data', 'goe_sample.i5.xml'));
 my $goe_tagged = rel2abs(catfile($f, '..', 't', 'data', 'goe_sample_tagged.i5.xml'));
+my $icc_german = rel2abs(catfile($f, '..', 't', 'data', 'icc_german_sample.p5.xml'));
 
 # Create a new benchmark object
 my $bench = Dumbbench->new(
@@ -96,6 +97,12 @@
     }
   ),
   Dumbbench::Instance::PerlSub->new(
+    name => 'Conversion of standard TEI',
+    code => sub {
+      `cat '$icc_german' | perl '$script' > /dev/null 2>&1`
+    }
+  ),
+  Dumbbench::Instance::PerlSub->new(
     name => 'delHTMLcom',
     code => sub {
       for (1..100_000) {