Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 220
  • Last Modified:

can this code produce named files ?

the code below does exactly what I need it to do

other than, I would like the files that it produces to be named with the extension .vim

Could you help with this please ?

#!/usr/bin/perl
use strict;
use warnings;
@ARGV=('master.vim') unless @ARGV; # read from master.vim if no file specified on command line
my $f='';
while( <> ){
    /(\d+)/ and $1 ne $f and $f=$1 , (open STDOUT,">>",$f or warn "$f $!");
    print;
}
0
Europa MacDonald
Asked:
Europa MacDonald
  • 2
1 Solution
 
ozoCommented:
open STDOUT,">>$f.vim"
0
 
Europa MacDonaldChief slayer of dragonsAuthor Commented:
its not working - the error is flashing too fast for me to make out what it is

#!/usr/bin/perl
use strict;
use warnings;
@ARGV=('master.vim') unless @ARGV; # read from master.vim if no file specified on command line
my $f='';
while( <> ){
    /(\d+)/ and $1 ne $f and $f=$1 , (open STDOUT,">>",$f.vim or warn "$f.vim $!");
    print;
}
0
 
ozoCommented:
">>",$f.vim  is not the same as ">>$f.vim"
I said
open STDOUT,">>$f.vim"
although you can also say
open STDOUT,">>","$f.vim"
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

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