diff options
| author | Graham Barr <gbarr@pobox.com> | 2004-04-16 17:42:24 +0000 |
|---|---|---|
| committer | Graham Barr <gbarr@pobox.com> | 2009-02-24 08:51:38 -0600 |
| commit | a655c3bcb3b2e4f9ef7e0ee438371990a44ed70e (patch) | |
| tree | 2948a336bc27fbadc663a8a30b70b4c07a5d7e51 | |
| parent | d83a9d5b3b835fd10ca788b97df027977fcf099d (diff) | |
| download | perl-libnet-a655c3bcb3b2e4f9ef7e0ee438371990a44ed70e.tar.gz | |
Make test output more readable
| -rw-r--r-- | t/datasend.t | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/t/datasend.t b/t/datasend.t index 48655fa..5c785ba 100644 --- a/t/datasend.t +++ b/t/datasend.t @@ -40,7 +40,10 @@ sub check { $cmd->datasend($line); } $cmd->dataend; - is($cmd->output, $expect); + is( + unpack("H*",$cmd->output), + unpack("H*",$expect) + ); } my $cmd; |