#!/bin/sh
##
# Código fuente LuCAS V3
# Copyright (C) 1999 Hispalinux / Juan J. Amor / Ismael Olea
# Programa bajo la proteccion de GPL 2.0
##
# $Id: repl-tutperl,v 1.1 2000/08/02 07:47:16 jjamor Exp $
##
#
# Frontend de WGET para replica de tutorial de PERL
# para cumplir requisitos del autor
#

TEMPORAL=/home/ftp/pub/LuCAS/Tutoriales/PERL/tmp
NOMWGET=granavenida.com/perl
PREDIR=granavenida.com
NOMREAL=/home/ftp/pub/LuCAS/Tutoriales/PERL/replica

mkdir -p $TEMPORAL/$PREDIR

mv $NOMREAL $TEMPORAL/$NOMWGET

cd $TEMPORAL

wget -m -np http://granavenida.com/perl/

mv $TEMPORAL/$NOMWGET $NOMREAL

cd /tmp

rm -rf $TEMPORAL

