laziness, impatience, and hubris | |
PerlMonks |
Re^4: Using system (); with Strawberry Perlby cavac (Parson) |
on Nov 30, 2021 at 13:47 UTC ( [id://11139269]=note: print w/replies, xml ) | Need Help?? |
Uhm, i grepped through parts of my codebase and there is this little gem: system "aplay /home/cavac/src/pagecamel_dsky/masteralarm.wav &"; Turns out, playing sound on a Raspberry Pi 2(!) is hard, especially from Perl. And yes, i have seen stuff like OP's code before. Many times. Many, many, times. Unfortunately. At least here on PM this is something that classes under "needs rewrite". I also develop Arduino stuff, and there a source code in that kind of quality would probably class as "made by an expert"...
perl -e 'use Crypt::Digest::SHA256 qw[sha256_hex]; print substr(sha256_hex("the Answer To Life, The Universe And Everything"), 6, 2), "\n";'
In Section
Seekers of Perl Wisdom
|
|