my ($on, $off, $count) = $_; # contains args