aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorB. Watson <urchlay@slackware.uk>2024-04-09 16:08:58 -0400
committerB. Watson <urchlay@slackware.uk>2024-04-09 16:08:58 -0400
commitc0f7527e02c14105085b5054b895c575654a8101 (patch)
tree136697b13d92bcfb5426bbd100a84e1f721ae0d6
parentc423da391b9e85f0f75063b73f93330dfffa2e11 (diff)
downloadmisc-scripts-c0f7527e02c14105085b5054b895c575654a8101.tar.gz
soxdial: handle invalid numerics like .5.5 without warnings.
-rwxr-xr-xsoxdial6
1 files changed, 6 insertions, 0 deletions
diff --git a/soxdial b/soxdial
index b5837ea..a2684b2 100755
--- a/soxdial
+++ b/soxdial
@@ -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 $_;
}