• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 212
  • Last Modified:

Perl code to write values to a file

Hello

Could you help me with some code ? I have to do some stats to some data then print it back to a new file (to be created at the time)

what code would I use to create a file and print out the contents of variables to it ?
0
Europa MacDonald
Asked:
Europa MacDonald
  • 2
1 Solution
 
Adam314Commented:

#The variables, and their values
my $v1=1;
my $v2=2;
 
open(my $fh, ">filename.txt") or die "filename.txt: $!\n";
print $fh "v1=$v1\n";
print $fh "v2=$v2\n";
close($fh);

Open in new window

0
 
Europa MacDonaldChief slayer of dragonsAuthor Commented:
thankyou
0
 
mrjoltcolaCommented:
Using your other question as a sample.
#!/usr/bin/perl
 
open(IN, "<in.txt") or die;
open(OUT, ">out.txt") or die;
my $s;
 
while($s = <IN>) {
   if($s =~ /(\d+),(\d+),(\d+),(\d+),(\d+),(\d+),(\d+)/) {
      my ($n1, $n2, $n3, $n4, $n5, $n6, $n7) = ($1, $2, $3, $4, $5, $6, $7);
      # Do some random calculations
      $n1 += 1;
      $n2 += 2;
      print OUT "$n1,$n2,$n3,$n4,$n5,$n6,$n7\n";
   }
}

Open in new window

0
 
Europa MacDonaldChief slayer of dragonsAuthor Commented:
thank you    mrjoltcola
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now