Select Code to Download

package T;

...
}

1;

package U;

...
}

1;

#!/usr/local/bin/perl

...
use U;

U->foo() foreach (0..10000);

Total Elapsed Time = -0.04006 Seconds
  User+System Time =        0 Seconds
...
 0.00   0.000 -0.000      2   0.0000      -  strict::import
 0.00   0.000 -0.000      2   0.0000      -  strict::bits
 0.00   0.000 -0.000      1   0.0000      -  T::BEGIN