http://qs321.pair.com?node_id=1226068


in reply to Re: How to execute a linux system command with perl?
in thread How to execute a linux system command with perl?

Also:

my @cmd = qw[/sbin/route add default gw 172.16.0.200 dev enxb827eb9540
+0d];

[download]

or

my @cmd = split/\ +/, "/sbin/route add default gw 172.16.0.200 dev enx
+b827eb95400d";

[download]

perl -e 'use MIME::Base64; print decode_base64("4pmsIE5ldmVyIGdvbm5hIGdpdmUgeW91IHVwCiAgTmV2ZXIgZ29ubmEgbGV0IHlvdSBkb3duLi4uIOKZqwo=");'

In Section Seekers of Perl Wisdom