use Test::More; ok connect_to_ftp(), "connect"; is get_something(), "expected string", "get_something"; is system("external command"), 0, "external command"; ... done_testing; # or use "plan tests => 123;" above