11 lines
131 B
Awk
11 lines
131 B
Awk
BEGIN {
|
|
FS = "\n";
|
|
}
|
|
|
|
/Schemes:/ {
|
|
while (getline && $0 != "") {
|
|
sub(/^ +/, "");
|
|
print "'" $0 "'";
|
|
}
|
|
}
|