diff options
author | B. Watson <urchlay@slackware.uk> | 2024-04-09 16:08:58 -0400 |
---|---|---|
committer | B. Watson <urchlay@slackware.uk> | 2024-04-09 16:08:58 -0400 |
commit | c0f7527e02c14105085b5054b895c575654a8101 (patch) | |
tree | 136697b13d92bcfb5426bbd100a84e1f721ae0d6 | |
parent | c423da391b9e85f0f75063b73f93330dfffa2e11 (diff) | |
download | misc-scripts-c0f7527e02c14105085b5054b895c575654a8101.tar.gz |
soxdial: handle invalid numerics like .5.5 without warnings.
-rwxr-xr-x | soxdial | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -425,18 +425,24 @@ sub make_sox_cmd { # support either seconds (possibly with decimal point, e.g. 0.5) or # milliseconds (e.g. 500ms). sub parse_sec { + no warnings "numeric"; $_ = shift || 0; if(/^(.+)ms$/) { $_ = $1 / 1000; + } else { + $_ += 0; } return $_; } # support either Hz (e.g. 8000) or KHz (e.g. 8k or 8K). sub parse_rate { + no warnings "numeric"; $_ = shift || 0; if(/^(.+)k$/i) { $_ = $1 * 1000; + } else { + $_ += 0; } return $_; } |