Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Simples testes para o formata_valor().

Signed-off-by: Thiago Berlitz Rondon <thiago.rondon@gmail.com>
  • Loading branch information...
commit 944f8819aefe70cd401d2731d11a07f312ebfafa 1 parent f6da8db
@thiagorondon thiagorondon authored
Showing with 15 additions and 0 deletions.
  1. +15 −0 t/cmd_utils/formata_valor.t
View
15 t/cmd_utils/formata_valor.t
@@ -0,0 +1,15 @@
+use strict;
+use warnings;
+use Test::More;
+use Test::More;
+
+use CMD::Utils qw(formata_valor);
+
+is(formata_valor('112'), 'R$ 112,00');
+is(formata_valor('112444'), 'R$ 112.444,00');
+is(formata_valor('112444555'), 'R$ 112 Mi');
+is(formata_valor('112444555666'), 'R$ 112 Bi');
+is(formata_valor('1124445556667'), 'R$ 1 Tri');
+
+done_testing();
+
Please sign in to comment.
Something went wrong with that request. Please try again.