miércoles, 25 de agosto de 2010

Lenguajes de scripting

Hola! para la tarea de lenguajes de progra les pongo los ejercicios que realizé.

AWK
Lenguaje de scrpting para procesamiento de texto, en donde lo divide por columnas.

Para realizar el siguiente ejemplo, utilizé este lenguaje de programación ya que está diseñado para procesar datos basados en ficheros, entonces, de un archivo .dat de captura de encuesta, ordenarlo según el porcentaje obtenido.

Aqui tenemos un fichero con una lista de datos.

Escribimos en el terminal.
awk '{ print $1, $2 | "sort -r > resultados.dat" }' resultados.dat
Lo que hace es ordenarlo y guardarlo en el mismo resultados.dat, para visualizar el archivo ponemos
awk '{print $1, $2}' resultados.dat

Manual de AWK 
¿Que es AWK?


Sh
Lenguaje de scripting que tenemos comunicación en la terminal optimizando las tareas de esta, seleccione este lenguaje de programación para realizar tareas, como el ejemplo siguiente en el que se determina el numero mayor de dos números tecleados.
#!/bin/sh

echo "Determina el mayor de los numeros enteros"
echo "Digita el primer numero" 
read var1
echo "Digita el segundo numero" 
read var2

if [ $var1 -gt $var2 ]
then
echo "El mayor es $var1"
fi

if [ $var2 -gt $var1 ]
then
echo "El mayor es $var2"
fi

if [ $var1 -eq $var2 ]
then
echo "Son iguales"
fi

NOTA que no se utiliza el == al comparar en el if y que se termina con fi.
recuerda que para poder correrlo  necesitamos primero darle los permisos
con
chmod u+x ejemplo1.sh

Descargalo Aqui
Manual de SH


Perl
Lenguaje de scripting popular en que está influido por C, algunas veces se presentan dificultades al leerlo por el programador en el ejemplo siguiente hice un programa que cambia la moneda mexicana en dolares, euros o libras.
#!/usr/bin/perl

my $cambio;
my $pesos;
my $op;
  
use Switch;

print "Hola! dime que quieres cambiar!\n";
print "1.-Dolares\n";
print "2.-Euro\n";
print "3.-Libra\n";
chomp($op = <>);

switch($op) {
  case "1" {
    print "Ingrese los pesos ";
    chomp($cambio = <>);
    $cambio = $cambio * 12.95;
    print  $cambio;
    print " Dolares\n";
     }

  case "2" {
    print "Ingrese los pesos ";
    chomp($cambio = <>);
    $cambio = $cambio * 16.44;
    print $cambio; 
    print " Euros\n"; 
     }

  case "3" {
    print "Ingrese los pesos ";
    chomp($cambio = <>);
    $cambio = $cambio * 20.36;
    print $cambio;
    print " Libras\n";
     }
  
NOTA este script no me funcionaba hasta que utilizé gracias a la profe la función chomp para poder obtener el resultado, ya que si no obtenía el enter al teclear en vez del numero.
lo que hace esta funcion es eliminar cualquier caracter del final de una cadena, en este caso el enter, si quieres saber mas sobre esta función has clic aqui.



Descargalo Aqui
Manual de PERL

Python
Lenguaje scriping  con sintaxis comoda para el programador multiparadigma, es de codigo abierto, es un ejemplo en el que se calcula la resistencia de un dispositivo.
#!/usr/bin/python

print "Obtener la resistencia\n"
volt = float(input("Teclea el voltaje del dispisitivo :"))
inten = float(input("Teclea la intensidad del dispositivo :"))

resi = volt / inten

print "La resistencia es"
print resi
print "unidad OHMS"


Descargalo Aqui!
Puedes ver mi blog de Programación web, en donde actualizaré utilizando este lenguaje script
Manual de Python

Espero que mi explicación les sirva, si tienen algún comentario acerca de esta entrada, espero me digan ya que estoy abierto a cualquier error.

3 comentarios:

  1. Estaría bien que explicarás un poco en tu programa de shell para que se utiliza -eq -gt

    me gustaron tu códigos para repasar lo visto en clase!!

    ResponderEliminar
  2. Claro Sandra,
    mira -eq es el equivalente a el igual "==" en C
    y el -gt es el equivalente a el mayor que ">" en C

    saludos :)

    ResponderEliminar
  3. Bien hecho. Te pongo tres puntos y uno extra para la clase por esta entrada.

    ResponderEliminar