; separates statements. Putting two statements onto the same line does not make them a single statement any more than writing this as

($num)
 = 
$num
 =~ 
m#20(\d)#;
($num)
 = 
sprintf(
 "%02d",
 $num
);
[download]

makes it 11 statements.