in reply to How to write testable command line script?

Hi, does your subroutine expect a string or a list of args?

Edit: Oh, I see you say it does. To pass the args: 

ok(  main(90,180,270,'+',0,180,90) ...

[download]

If the sub returns the list of numbers, test with is_deeply() from Test::More. If it returns a string, use is().

Hope this helps!



The way forward always starts with a minimal test.

Replies are listed 'Best First'.
Re^2: How to write testable command line script?
by thechartist (Monk) on Nov 21, 2018 at 03:13 UTC

    Thanks for the input re: Test::Deeply. I thought I could test this easily with Test::Simple, or Test:More. I still have a lot to learn about the testing modules.

[reply]

      Hi, just to clarify, both testing methods I mentioned, is() and is_deeply() are from Test::More. The latter is often enough for comparing two arrays, for example, but if things get more complex then indeed you may want to move up to Test::Deep, which is much more flexible and powerful, providing cmp_deeply(), cmp_bag(), ignore() and other useful tools.

      Or, you can do as I do and simply always use: 

      use Test::Most 'die';

# tests

done_testing;
__END__

      [download]
      ... because Test::Most provides Test::Deep as well as several other useful libraries (and exports 'die' and loads strict and warnings).

      You are right; there are a lot of testing libraries and tools (and you can make your own!). Using them is one of the most satisfying parts of Perl software development, for me.

      Hope this helps!


      The way forward always starts with a minimal test.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom