set hp_det gpio

hc

2024-08-12 233ab1bd4c5697f5cdec94e60206e8c6ac609b4c

1
2
3
4
5
6
7
8
9
10
11
12
#! /usr/bin/perl
 
use strict;
use warnings;
use Getopt::Std;
 
our $opt_n = 0;
 
getopts('n') or die "Invalid option: $!\n";
 
print join(' ', @ARGV);
print "\n" unless $opt_n;