# ... when you call Forsaken_clean
$o1 = $o1->Forsaken_clean;


# ... and when you call rev_1318_clean
$o3 = $o3->rev_1318_clean;