Because Perl is rather context-sensitive and uses <I> to mean that in other contexts? In the code:

while (<I>) {
  s/<I>/<italic>/g;
}
[download]

the first <I> reads from a filehandle and the second is literal text to replace. Fun, isn't it? :)