Select Code to Download

    # base   range   clck     operational freq
    19.2e6 / 1024  /  32   ==     586Hz

    19.2e6 / 2000 / 192 == 50Hz

use warnings;
use strict;
...

$s->pwm(LEFT);
$s->mode(INPUT);