diff --git a/lib/MYDan/AntDen/Cli.pm b/lib/MYDan/AntDen/Cli.pm index d2e7d84..e0d0dd3 100644 --- a/lib/MYDan/AntDen/Cli.pm +++ b/lib/MYDan/AntDen/Cli.pm @@ -53,7 +53,7 @@ sub _rcall my $res = $result{$api} || ''; die "call fail: $res" unless $res =~ s/--- 0$//; - die "[Error]$res" if $res !~ /^---\n/; + die "[Error]$res" if $res !~ /^---/; return $res; }