#!/usr/bin/perl
#
# Eliminar de la cadena de nombre de un archivo
# la extension.
# El argumento es pasado en la linea de comando.
#############
@allwords = split(/\./, $ARGV[0]);
$ext = pop(@allwords);
foreach $item ( @allwords ){
print $item.".";
}
print "\n";
jueves, 21 de febrero de 2008
lunes, 18 de febrero de 2008
Este link...
Learn 10 good UNIX usage habits
http://www-128.ibm.com/developerworks/aix/library/au-badunixhabits.html
http://www.ibm.com/developerworks/aix/library/au-unixtips/?ca=dgr-lnxw13goodunixhabits&S_TACT=105AGX59&S_CMP=GR
Comandos
http://cb.vu/unixtoolbox.xhtml
http://www.oreillynet.com/linux/cmd/
Referencias
http://www.unix.org.ua/orelly/
http://bhami.com/rosetta.html
Redes sociales
http://systemadmin.es/
http://houseofsysadmins.ning.com/
Interesante
http://www.faqs.org/faqs/unix-faq/shell/csh-whynot/
http://www-128.ibm.com/developerworks/aix/library/au-badunixhabits.html
http://www.ibm.com/developerworks/aix/library/au-unixtips/?ca=dgr-lnxw13goodunixhabits&S_TACT=105AGX59&S_CMP=GR
Comandos
http://cb.vu/unixtoolbox.xhtml
http://www.oreillynet.com/linux/cmd/
Referencias
http://www.unix.org.ua/orelly/
http://bhami.com/rosetta.html
Redes sociales
http://systemadmin.es/
http://houseofsysadmins.ning.com/
Interesante
http://www.faqs.org/faqs/unix-faq/shell/csh-whynot/
Suscribirse a:
Entradas (Atom)