my $psub = \&calledBack;
    setCallback( $psub );