sub dBug_showArray {
    my $msg = shift;
    print "\n\n\Value of array '$msg' is:\n";
    ...
    ...

##</code><code>##

dBug_showArray("@currTime", @currTime);