Article View: es.comp.os.linux.programacion
Article #533Re: pasar de una a dos columnas... como se hace?
From: Horaci Castellini
Date: Wed, 02 May 2007 17:53
Date: Wed, 02 May 2007 17:53
32 lines
1992 bytes
1992 bytes
El M�quinas wrote:
> Hola:
>
> En Bash no se pero en Perl sin mucho pensar podr�a ser algo as�:
>
> #!/usr/bin/perl
> use strict;
>
> my $file1 = shift;
> my $file2 = shift;
>
> if (open (FHA,$file1)) {
> if (open (FHB, $file2)) {
> do {
> my $line1 = <FHA>;
> my $line2 = <FHB>;
> chomp($line1); # Elimino el caracter \n de la l�nea
> chomp($line2);
> print $line1."\t".$line2."\n";
> } until (eof(FHA) and eof(FHB));
> close(FHB);
> }
> close(FHA);
> }
>
> Lo guardas en un ficherito con permisos de ejecuci�n y lo llamas desde
> la shell pasando como primer operando el primer fichero, como segundo
> operando en segundo fichero, el resultado se muestra en la consola.
>
> Saludos.
Muchas gracias...
Technical Details
Message-ID:
<f1ajdr$ud5$1@helvete.escomposlinux.org>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news2.google.com!proxad.net!news.newsland.it!news.germany.com!storethat.news.telefonica.de!telefonica.de!news.antakira.com!cagarruta.escomposlinux.org!helvete.escomposlinux.org!escomposlinux.org!not-for-mailReferences:
<f19rio$h95$1@helvete.escomposlinux.org> <4638A8B6.40300@terra.es>Show Full Headers
Complete Article Headers
X-Google-Thread: f86c8,8fe97fcf17270ce X-Google-Attributes: gidf86c8,public X-Google-Language: SPANISH,ASCII Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news2.google.com!proxad.net!news.newsland.it!news.germany.com!storethat.news.telefonica.de!telefonica.de!news.antakira.com!cagarruta.escomposlinux.org!helvete.escomposlinux.org!escomposlinux.org!not-for-mail From: Horaci Castellini <hcaste@fonosur.com.ar> Newsgroups: es.comp.os.linux.programacion Subject: Re: pasar de una a dos columnas... como se hace? Date: Wed, 02 May 2007 14:53:12 -0300 Organization: Ecolnet Lines: 32 Message-ID: <f1ajdr$ud5$1@helvete.escomposlinux.org> References: <f19rio$h95$1@helvete.escomposlinux.org> <4638A8B6.40300@terra.es> NNTP-Posting-Host: host11.201-253-80.telecom.net.ar Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 8bit X-Trace: helvete.escomposlinux.org 1178128635 31141 201.253.80.11 (2 May 2007 17:57:15 GMT) X-Complaints-To: newsmaster@helvete.escomposlinux.org NNTP-Posting-Date: Wed, 2 May 2007 17:57:15 +0000 (UTC) User-Agent: Thunderbird 2.0.0.0 (X11/20070326) In-Reply-To: <4638A8B6.40300@terra.es>