2017-07-15 07:27:55 +00:00
|
|
|
---
|
|
|
|
language: awk
|
|
|
|
filename: learnawk-es.awk
|
|
|
|
contributors:
|
|
|
|
- ["Marshall Mason", "http://github.com/marshallmason"]
|
|
|
|
translators:
|
|
|
|
- ["Hugo Guillén-Ramírez", "http://github.com/HugoGuillen"]
|
|
|
|
lang: es-es
|
|
|
|
---
|
|
|
|
|
2017-07-15 07:40:58 +00:00
|
|
|
AWK es una herramienta estándar en cada sistema UNIX compatible con POSIX.
|
|
|
|
Es como un Perl restringido, perfecto para tareas de procesamiento de texto y
|
|
|
|
otras necesidades de scripting. Tiene una sintaxis similar a C, pero sin
|
|
|
|
puntos y comas, manejo manual de memoria y tipado estático. Puedes llamarlo
|
|
|
|
desde un script de shell o usarlo como un lenguaje stand-alone para scripting.
|
|
|
|
|
|
|
|
¿Por qué elegir AWK sobre Perl? Principalmente, porque AWK es parte de UNIX.
|
|
|
|
Siempre puedes contar con él, mientras que el futuro de Perl está en duda. AWK
|
|
|
|
es más fácil de leer que Perl. Para scripts sencillos de procesamiento de texto,
|
|
|
|
particularmente si es para leer archivos línea a línea y dividir por
|
|
|
|
delimitadores, probablemente AWK es la herramienta correcta para el trabajo.
|
2017-07-15 07:27:55 +00:00
|
|
|
|
|
|
|
```awk
|
|
|
|
#!/usr/bin/awk -f
|
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Los comentarios tienen este aspecto.
|
|
|
|
|
|
|
|
# Los programas AWK son una colección de patrones y acciones. El patrón más
|
|
|
|
# importante es BEGIN. Las acciones van en bloques delimitados por llaves.
|
2017-07-15 07:27:55 +00:00
|
|
|
|
|
|
|
BEGIN {
|
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# BEGIN correrá al inicio del programa. Es donde pones todo el código
|
|
|
|
# preliminar antes de procesar los archivos de texto. Si no tienes archivos
|
|
|
|
# de texto, piensa en BEGIN como el punto de entrada principal del script.
|
2017-07-15 07:27:55 +00:00
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Las variables son globales. Asígnalas o úsalas sin declararlas.
|
2017-07-15 07:27:55 +00:00
|
|
|
count = 0
|
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Los operadores son justo como en C (y amigos).
|
2017-07-15 07:27:55 +00:00
|
|
|
a = count + 1
|
|
|
|
b = count - 1
|
|
|
|
c = count * 1
|
|
|
|
d = count / 1
|
2017-07-15 08:16:11 +00:00
|
|
|
e = count % 1 # módulo
|
|
|
|
f = count ^ 1 # exponenciación
|
2017-07-15 07:27:55 +00:00
|
|
|
|
|
|
|
a += 1
|
|
|
|
b -= 1
|
|
|
|
c *= 1
|
|
|
|
d /= 1
|
|
|
|
e %= 1
|
|
|
|
f ^= 1
|
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Incremento y decremento en uno
|
2017-07-15 07:27:55 +00:00
|
|
|
a++
|
|
|
|
b--
|
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Como un operador prefijo, regresa el valor modificado
|
2017-07-15 07:27:55 +00:00
|
|
|
++a
|
|
|
|
--b
|
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Nota que no hay puntación para terminar las instrucciones
|
2017-07-15 07:27:55 +00:00
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Instrucciones de control
|
2017-07-15 07:27:55 +00:00
|
|
|
if (count == 0)
|
2017-07-15 08:16:11 +00:00
|
|
|
print "Iniciando count en 0"
|
2017-07-15 07:27:55 +00:00
|
|
|
else
|
2017-07-15 08:16:11 +00:00
|
|
|
print "Eh?"
|
2017-07-15 07:27:55 +00:00
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# O puedes usar el operador ternario
|
|
|
|
print (count == 0) ? "Iniciando count en 0" : "Eh?"
|
2017-07-15 07:27:55 +00:00
|
|
|
|
2017-07-15 08:16:11 +00:00
|
|
|
# Bloques formados por múltiples líneas usan llaves
|
2017-07-15 07:27:55 +00:00
|
|
|
while (a < 10) {
|
2017-07-15 08:16:11 +00:00
|
|
|
print "La concatenación de strings se hace " " con series " " de"
|
|
|
|
" strings separados por espacios"
|
2017-07-15 07:27:55 +00:00
|
|
|
print a
|
|
|
|
|
|
|
|
a++
|
|
|
|
}
|
|
|
|
|
|
|
|
for (i = 0; i < 10; i++)
|
2017-07-15 08:16:11 +00:00
|
|
|
print "El viejo confiable ciclo for"
|
2017-07-15 07:27:55 +00:00
|
|
|
|
|
|
|
# As for comparisons, they're the standards:
|
|
|
|
a < b # Less than
|
|
|
|
a <= b # Less than or equal
|
|
|
|
a != b # Not equal
|
|
|
|
a == b # Equal
|
|
|
|
a > b # Greater than
|
|
|
|
a >= b # Greater than or equal
|
|
|
|
|
|
|
|
# Logical operators as well
|
|
|
|
a && b # AND
|
|
|
|
a || b # OR
|
|
|
|
|
|
|
|
# In addition, there's the super useful regular expression match
|
|
|
|
if ("foo" ~ "^fo+$")
|
|
|
|
print "Fooey!"
|
|
|
|
if ("boo" !~ "^fo+$")
|
|
|
|
print "Boo!"
|
|
|
|
|
|
|
|
# Arrays
|
|
|
|
arr[0] = "foo"
|
|
|
|
arr[1] = "bar"
|
|
|
|
# Unfortunately, there is no other way to initialize an array. Ya just
|
|
|
|
# gotta chug through every value line by line like that.
|
|
|
|
|
|
|
|
# You also have associative arrays
|
|
|
|
assoc["foo"] = "bar"
|
|
|
|
assoc["bar"] = "baz"
|
|
|
|
|
|
|
|
# And multi-dimensional arrays, with some limitations I won't mention here
|
|
|
|
multidim[0,0] = "foo"
|
|
|
|
multidim[0,1] = "bar"
|
|
|
|
multidim[1,0] = "baz"
|
|
|
|
multidim[1,1] = "boo"
|
|
|
|
|
|
|
|
# You can test for array membership
|
|
|
|
if ("foo" in assoc)
|
|
|
|
print "Fooey!"
|
|
|
|
|
|
|
|
# You can also use the 'in' operator to traverse the keys of an array
|
|
|
|
for (key in assoc)
|
|
|
|
print assoc[key]
|
|
|
|
|
|
|
|
# The command line is in a special array called ARGV
|
|
|
|
for (argnum in ARGV)
|
|
|
|
print ARGV[argnum]
|
|
|
|
|
|
|
|
# You can remove elements of an array
|
|
|
|
# This is particularly useful to prevent AWK from assuming the arguments
|
|
|
|
# are files for it to process
|
|
|
|
delete ARGV[1]
|
|
|
|
|
|
|
|
# The number of command line arguments is in a variable called ARGC
|
|
|
|
print ARGC
|
|
|
|
|
|
|
|
# AWK has several built-in functions. They fall into three categories. I'll
|
|
|
|
# demonstrate each of them in their own functions, defined later.
|
|
|
|
|
|
|
|
return_value = arithmetic_functions(a, b, c)
|
|
|
|
string_functions()
|
|
|
|
io_functions()
|
|
|
|
}
|
|
|
|
|
|
|
|
# Here's how you define a function
|
|
|
|
function arithmetic_functions(a, b, c, localvar) {
|
|
|
|
|
|
|
|
# Probably the most annoying part of AWK is that there are no local
|
|
|
|
# variables. Everything is global. For short scripts, this is fine, even
|
|
|
|
# useful, but for longer scripts, this can be a problem.
|
|
|
|
|
|
|
|
# There is a work-around (ahem, hack). Function arguments are local to the
|
|
|
|
# function, and AWK allows you to define more function arguments than it
|
|
|
|
# needs. So just stick local variable in the function declaration, like I
|
|
|
|
# did above. As a convention, stick in some extra whitespace to distinguish
|
|
|
|
# between actual function parameters and local variables. In this example,
|
|
|
|
# a, b, and c are actual parameters, while d is merely a local variable.
|
|
|
|
|
|
|
|
# Now, to demonstrate the arithmetic functions
|
|
|
|
|
|
|
|
# Most AWK implementations have some standard trig functions
|
|
|
|
localvar = sin(a)
|
|
|
|
localvar = cos(a)
|
|
|
|
localvar = atan2(a, b) # arc tangent of b / a
|
|
|
|
|
|
|
|
# And logarithmic stuff
|
|
|
|
localvar = exp(a)
|
|
|
|
localvar = log(a)
|
|
|
|
|
|
|
|
# Square root
|
|
|
|
localvar = sqrt(a)
|
|
|
|
|
|
|
|
# Truncate floating point to integer
|
|
|
|
localvar = int(5.34) # localvar => 5
|
|
|
|
|
|
|
|
# Random numbers
|
|
|
|
srand() # Supply a seed as an argument. By default, it uses the time of day
|
|
|
|
localvar = rand() # Random number between 0 and 1.
|
|
|
|
|
|
|
|
# Here's how to return a value
|
|
|
|
return localvar
|
|
|
|
}
|
|
|
|
|
|
|
|
function string_functions( localvar, arr) {
|
|
|
|
|
|
|
|
# AWK, being a string-processing language, has several string-related
|
|
|
|
# functions, many of which rely heavily on regular expressions.
|
|
|
|
|
|
|
|
# Search and replace, first instance (sub) or all instances (gsub)
|
|
|
|
# Both return number of matches replaced
|
|
|
|
localvar = "fooooobar"
|
|
|
|
sub("fo+", "Meet me at the ", localvar) # localvar => "Meet me at the bar"
|
|
|
|
gsub("e+", ".", localvar) # localvar => "m..t m. at th. bar"
|
|
|
|
|
|
|
|
# Search for a string that matches a regular expression
|
|
|
|
# index() does the same thing, but doesn't allow a regular expression
|
|
|
|
match(localvar, "t") # => 4, since the 't' is the fourth character
|
|
|
|
|
|
|
|
# Split on a delimiter
|
|
|
|
split("foo-bar-baz", arr, "-") # a => ["foo", "bar", "baz"]
|
|
|
|
|
|
|
|
# Other useful stuff
|
|
|
|
sprintf("%s %d %d %d", "Testing", 1, 2, 3) # => "Testing 1 2 3"
|
|
|
|
substr("foobar", 2, 3) # => "oob"
|
|
|
|
substr("foobar", 4) # => "bar"
|
|
|
|
length("foo") # => 3
|
|
|
|
tolower("FOO") # => "foo"
|
|
|
|
toupper("foo") # => "FOO"
|
|
|
|
}
|
|
|
|
|
|
|
|
function io_functions( localvar) {
|
|
|
|
|
|
|
|
# You've already seen print
|
|
|
|
print "Hello world"
|
|
|
|
|
|
|
|
# There's also printf
|
|
|
|
printf("%s %d %d %d\n", "Testing", 1, 2, 3)
|
|
|
|
|
|
|
|
# AWK doesn't have file handles, per se. It will automatically open a file
|
|
|
|
# handle for you when you use something that needs one. The string you used
|
|
|
|
# for this can be treated as a file handle, for purposes of I/O. This makes
|
|
|
|
# it feel sort of like shell scripting:
|
|
|
|
|
|
|
|
print "foobar" >"/tmp/foobar.txt"
|
|
|
|
|
|
|
|
# Now the string "/tmp/foobar.txt" is a file handle. You can close it:
|
|
|
|
close("/tmp/foobar.txt")
|
|
|
|
|
|
|
|
# Here's how you run something in the shell
|
|
|
|
system("echo foobar") # => prints foobar
|
|
|
|
|
|
|
|
# Reads a line from standard input and stores in localvar
|
|
|
|
getline localvar
|
|
|
|
|
|
|
|
# Reads a line from a pipe
|
|
|
|
"echo foobar" | getline localvar # localvar => "foobar"
|
|
|
|
close("echo foobar")
|
|
|
|
|
|
|
|
# Reads a line from a file and stores in localvar
|
|
|
|
getline localvar <"/tmp/foobar.txt"
|
|
|
|
close("/tmp/foobar.txt")
|
|
|
|
}
|
|
|
|
|
|
|
|
# As I said at the beginning, AWK programs consist of a collection of patterns
|
|
|
|
# and actions. You've already seen the all-important BEGIN pattern. Other
|
|
|
|
# patterns are used only if you're processing lines from files or standard
|
|
|
|
# input.
|
|
|
|
#
|
|
|
|
# When you pass arguments to AWK, they are treated as file names to process.
|
|
|
|
# It will process them all, in order. Think of it like an implicit for loop,
|
|
|
|
# iterating over the lines in these files. these patterns and actions are like
|
|
|
|
# switch statements inside the loop.
|
|
|
|
|
|
|
|
/^fo+bar$/ {
|
|
|
|
|
|
|
|
# This action will execute for every line that matches the regular
|
|
|
|
# expression, /^fo+bar$/, and will be skipped for any line that fails to
|
|
|
|
# match it. Let's just print the line:
|
|
|
|
|
|
|
|
print
|
|
|
|
|
|
|
|
# Whoa, no argument! That's because print has a default argument: $0.
|
|
|
|
# $0 is the name of the current line being processed. It is created
|
|
|
|
# automatically for you.
|
|
|
|
|
|
|
|
# You can probably guess there are other $ variables. Every line is
|
|
|
|
# implicitely split before every action is called, much like the shell
|
|
|
|
# does. And, like the shell, each field can be access with a dollar sign
|
|
|
|
|
|
|
|
# This will print the second and fourth fields in the line
|
|
|
|
print $2, $4
|
|
|
|
|
|
|
|
# AWK automatically defines many other variables to help you inspect and
|
|
|
|
# process each line. The most important one is NF
|
|
|
|
|
|
|
|
# Prints the number of fields on this line
|
|
|
|
print NF
|
|
|
|
|
|
|
|
# Print the last field on this line
|
|
|
|
print $NF
|
|
|
|
}
|
|
|
|
|
|
|
|
# Every pattern is actually a true/false test. The regular expression in the
|
|
|
|
# last pattern is also a true/false test, but part of it was hidden. If you
|
|
|
|
# don't give it a string to test, it will assume $0, the line that it's
|
|
|
|
# currently processing. Thus, the complete version of it is this:
|
|
|
|
|
|
|
|
$0 ~ /^fo+bar$/ {
|
|
|
|
print "Equivalent to the last pattern"
|
|
|
|
}
|
|
|
|
|
|
|
|
a > 0 {
|
|
|
|
# This will execute once for each line, as long as a is positive
|
|
|
|
}
|
|
|
|
|
|
|
|
# You get the idea. Processing text files, reading in a line at a time, and
|
|
|
|
# doing something with it, particularly splitting on a delimiter, is so common
|
|
|
|
# in UNIX that AWK is a scripting language that does all of it for you, without
|
|
|
|
# you needing to ask. All you have to do is write the patterns and actions
|
|
|
|
# based on what you expect of the input, and what you want to do with it.
|
|
|
|
|
|
|
|
# Here's a quick example of a simple script, the sort of thing AWK is perfect
|
|
|
|
# for. It will read a name from standard input and then will print the average
|
|
|
|
# age of everyone with that first name. Let's say you supply as an argument the
|
|
|
|
# name of a this data file:
|
|
|
|
#
|
|
|
|
# Bob Jones 32
|
|
|
|
# Jane Doe 22
|
|
|
|
# Steve Stevens 83
|
|
|
|
# Bob Smith 29
|
|
|
|
# Bob Barker 72
|
|
|
|
#
|
|
|
|
# Here's the script:
|
|
|
|
|
|
|
|
BEGIN {
|
|
|
|
|
|
|
|
# First, ask the user for the name
|
|
|
|
print "What name would you like the average age for?"
|
|
|
|
|
|
|
|
# Get a line from standard input, not from files on the command line
|
|
|
|
getline name <"/dev/stdin"
|
|
|
|
}
|
|
|
|
|
|
|
|
# Now, match every line whose first field is the given name
|
|
|
|
$1 == name {
|
|
|
|
|
|
|
|
# Inside here, we have access to a number of useful variables, already
|
|
|
|
# pre-loaded for us:
|
|
|
|
# $0 is the entire line
|
|
|
|
# $3 is the third field, the age, which is what we're interested in here
|
|
|
|
# NF is the number of fields, which should be 3
|
|
|
|
# NR is the number of records (lines) seen so far
|
|
|
|
# FILENAME is the name of the file being processed
|
|
|
|
# FS is the field separator being used, which is " " here
|
|
|
|
# ...etc. There are plenty more, documented in the man page.
|
|
|
|
|
|
|
|
# Keep track of a running total and how many lines matched
|
|
|
|
sum += $3
|
|
|
|
nlines++
|
|
|
|
}
|
|
|
|
|
|
|
|
# Another special pattern is called END. It will run after processing all the
|
|
|
|
# text files. Unlike BEGIN, it will only run if you've given it input to
|
|
|
|
# process. It will run after all the files have been read and processed
|
|
|
|
# according to the rules and actions you've provided. The purpose of it is
|
|
|
|
# usually to output some kind of final report, or do something with the
|
|
|
|
# aggregate of the data you've accumulated over the course of the script.
|
|
|
|
|
|
|
|
END {
|
|
|
|
if (nlines)
|
|
|
|
print "The average age for " name " is " sum / nlines
|
|
|
|
}
|
|
|
|
|
|
|
|
```
|
|
|
|
Further Reading:
|
|
|
|
|
|
|
|
* [Awk tutorial](http://www.grymoire.com/Unix/Awk.html)
|
|
|
|
* [Awk man page](https://linux.die.net/man/1/awk)
|
|
|
|
* [The GNU Awk User's Guide](https://www.gnu.org/software/gawk/manual/gawk.html) GNU Awk is found on most Linux systems.
|