We help IT Professionals succeed at work.

Check out our new AWS podcast with Certified Expert, Phil Phillips! Listen to "How to Execute a Seamless AWS Migration" on EE or on your favorite podcast platform. Listen Now

x

perl question

paulieomeara
paulieomeara asked
on
Medium Priority
255 Views
Last Modified: 2010-08-05
Hello, I have below a script from a previous question-- I need to open an output file to put the results into. I want the outfile file to have the header "Chain A :" at the start of the results eg. ChainA :1,2,5,7,6,9 etc..... can anyone help?

#!/usr/bin/perl
                                                                                           
use strict;
use warnings;
                                                                                           
$_ = '---bbbb--bbbb';
                                                                                           
my @pos;
while (/\G.*?-/g) {
  push @pos, pos;
}
                                                                                           
print join ', ', @pos;
print "\n";
Comment
Watch Question

CERTIFIED EXPERT
Commented:
Unlock this solution and get a sample of our free trial.
(No credit card required)
UNLOCK SOLUTION

Author

Commented:
Thanks Lefton...don't know why it didn't work for me before but hey...all good!
Unlock the solution to this question.
Thanks for using Experts Exchange.

Please provide your email to receive a sample view!

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.