Leer y cambiar archivo.

[Roberto Jimeno]

>    > Cual es la forma mas sencilla de hacerlo?
>    > 
>    > Gracias por su ayuda.
>    > 
>    > --
>    > Saludos,
>    > Ulises
>    > O Captain! My Captain!
> 
>    open(NUMBER,"number.txt") || die $!;
>    $num = <NUMBER>;
>    close(NUMBER);
>    $num--;
> 
>    ###################
>    # Store Data Number
>    open(NUM,">number.txt") || die $!;
>    print NUM "$num";
>    close(NUM);

	Esa solución me gusta y me parece limpia y ordenada; sin
embargo, en un apuro también es posible hacerlo sencillamente así:

$num = `cat number.txt`;
$num--;
system "echo $num > number.txt";

						(el de fcarmona es mejor)
-- 
-------------------------------------------------------------------------------
Roberto Jimeno.       From The Cher-Speak Dictionary for the totally clueless:
ran.dom (RAN DM), adj. 1. mediocre. 2. whack (sort of)