Sistemas Operativos > GNU/Linux
SCript BAsh
su -:
:nosweat: Cierto.
En Bash se puede hacer:
--- Código: Bash ---#!/bin/bashwhile read -n13 string; do echo $string >> salida.txtdone < fichero.txt
En Perl:
--- Código: Perl ---#!/usr/bin/perluse strict;open IN, "mi_fichero.txt" or die "Error entrada: $!n";open OUT, "+>mi_salida.txt" or die "Error salida: $!n";my $buffer;while ( read(IN, $buffer, 13) != 0 ) { print OUT "$buffern";}close OUT;close IN;
Navegación
[*] Página Anterior
Ir a la versión completa