Like ESPythoNOW, but in Perl. Send a packet:
~$ sudo perl send_now.pl
[*] Connected to wlp2s0mon (Index: 4)
[*] Sending packet (76 bytes)...
[*] Sent.
Received payload on an ESP32:
I (22506) DEBUG: Seen packet from: aa:bb:cc. Len: 25
RX[25]: 01 02 03 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5
Receiver script example output:
~$ sudo perl receive_now.pl
[*] Listening on wlp2s0mon...
0x48 0x65 0x6c 0x6c 0x6f 0x20 0x66 0x72 0x6f 0x6d 0x20 0x45 0x53 0x50 0x33 0x32 0x2d 0x43 0x33 0x21 0x00
0x48 0x65 0x6c 0x6c 0x6f 0x20 0x66 0x72 0x6f 0x6d 0x20 0x45 0x53 0x50 0x33 0x32 0x2d 0x43 0x33 0x21 0x00
0x48 0x65 0x6c 0x6c 0x6f 0x20 0x66 0x72 0x6f 0x6d 0x20 0x45 0x53 0x50 0x33 0x32 0x2d 0x43 0x33 0x21 0x00
~$ sudo perl receive_now.pl -h
[*] Listening on wlp2s0mon...
Hello from ESP32-C3!
~$ sudo perl receive_now.pl -f some_espnowdump
[*] Listening on wlp2s0mon...
0x48 0x65 0x6c 0x6c 0x6f 0x20 0x66 0x72 0x6f 0x6d 0x20 0x45 0x53 0x50 0x33 0x32 0x2d 0x43 0x33 0x21 0x00
^C
~$ xxd some_espnowdump
00000000: 4865 6c6c 6f20 6672 6f6d 2045 5350 3332 Hello from ESP32
00000010: 2d43 3321 00 -C3!.