Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl

...
0 0 0 0 0 0 0 0 $7,890.12- 0
0 0 0 0 0 0 0 0 -$3,456.78 0
0 0 0 0 0 0 0 0 $-9,012.34 0
  2. or download this
    1234.56
-7890.12
-3456.78
-9012.34
  3. or download this
        $TFCNTL_Tax[@TFCNTL_Tax] = (split)[8] =~ s/[\$,]//gr =~ s/^(.*)-$/
+-$1/r;