Remove '//' operator to work with perl < 5.010.