C:\_32\C>perl -e "print 0.5 ** 0.5"
0.707106781186548
C:\_32\C>perl -e "print 0.05 ** 0.05"
0.860891659331735
C:\_32\C>perl -e "print 0.005 ** 0.005"
0.973856237016479
C:\_32\C>perl -e "print 0.0000005 ** 0.0000005"
0.999992745697443
C:\_32\C>perl -e "print 0.00000000005 ** 0.00000000005"
0.99999999881405
C:\_32\C>perl -e "print 0.0000000000001 ** 0.0000000000001"
0.999999999997007
C:\_32\C>perl -e "print 0.0000000000000001 ** 0.0000000000000001"
0.999999999999996

##</code><code>##

C:\_32\C>perl -MMath::Complex -e "$z = cplx(0, 1); print $z ** 0"
1