how to get all individual matches from a regex in perl?





.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty{ height:90px;width:728px;box-sizing:border-box;
}







1















I have this:



my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);


or this:



my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";


How to get all first and last name use /[w']+ [w']+/?






arrays regex string perl







share|improve this question































    1















    I have this:



    my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);


    or this:



    my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";


    How to get all first and last name use /[w']+ [w']+/?






    arrays regex string perl







    share|improve this question



























      1












      1








      1


      1






      I have this:



      my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);


      or this:



      my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";


      How to get all first and last name use /[w']+ [w']+/?






      arrays regex string perl







      share|improve this question
















      I have this:



      my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);


      or this:



      my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";


      How to get all first and last name use /[w']+ [w']+/?






      arrays regex string perl




      arrays regex string perl






      share|improve this question















      share|improve this question













      share|improve this question




      share|improve this question








      edited Nov 25 '18 at 11:01









      choroba

      160k15142212




      160k15142212










      asked Nov 25 '18 at 10:55









      Nutiu RaduNutiu Radu

      398




      398
























          1 Answer
          1






          active

          oldest

          votes


















          4














          If you start with a hash, just use keys and values to extract the first names and last names. To extract the names from a string, just add capture groups and /g to find all the matches:



          #!/usr/bin/perl
          
use warnings;
          
use strict;
          
use feature qw{ say };
          

          
my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);
          

          
say join ' ', 'First names:', keys %names;
          
say join ' ', 'Last names:', values %names;
          

          
my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";
          

          
my (@first_names, @last_names);
          
while ($scalar_string =~ /([w']+) ([w']+)/g) {
          
    push @first_names, $1;
          
    push @last_names, $2;
          
}
          
say join ' ', 'First names:', @first_names;
          
say join ' ', 'Last names:', @last_names;





          share|improve this answer
























            Your Answer






            StackExchange.ifUsing("editor", function () {
            StackExchange.using("externalEditor", function () {
            StackExchange.using("snippets", function () {
            StackExchange.snippets.init();
            });
            });
            }, "code-snippets");

            StackExchange.ready(function() {
            var channelOptions = {
            tags: "".split(" "),
            id: "1"
            };
            initTagRenderer("".split(" "), "".split(" "), channelOptions);

            StackExchange.using("externalEditor", function() {
            // Have to fire editor after snippets, if snippets enabled
            if (StackExchange.settings.snippets.snippetsEnabled) {
            StackExchange.using("snippets", function() {
            createEditor();
            });
            }
            else {
            createEditor();
            }
            });

            function createEditor() {
            StackExchange.prepareEditor({
            heartbeatType: 'answer',
            autoActivateHeartbeat: false,
            convertImagesToLinks: true,
            noModals: true,
            showLowRepImageUploadWarning: true,
            reputationToPostImages: 10,
            bindNavPrevention: true,
            postfix: "",
            imageUploader: {
            brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
            contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
            allowUrls: true
            },
            onDemand: true,
            discardSelector: ".discard-answer"
            ,immediatelyShowMarkdownHelp:true
            });


            }
            });














            draft saved

            draft discarded


















            StackExchange.ready(
            function () {
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53466759%2fhow-to-get-all-individual-matches-from-a-regex-in-perl%23new-answer', 'question_page');
            }
            );

            Post as a guest















            Required, but never shown

























            1 Answer
            1






            active

            oldest

            votes








            1 Answer
            1






            active

            oldest

            votes









            active

            oldest

            votes






            active

            oldest

            votes









            4














            If you start with a hash, just use keys and values to extract the first names and last names. To extract the names from a string, just add capture groups and /g to find all the matches:



            #!/usr/bin/perl
            
use warnings;
            
use strict;
            
use feature qw{ say };
            

            
my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);
            

            
say join ' ', 'First names:', keys %names;
            
say join ' ', 'Last names:', values %names;
            

            
my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";
            

            
my (@first_names, @last_names);
            
while ($scalar_string =~ /([w']+) ([w']+)/g) {
            
    push @first_names, $1;
            
    push @last_names, $2;
            
}
            
say join ' ', 'First names:', @first_names;
            
say join ' ', 'Last names:', @last_names;





            share|improve this answer




























              4














              If you start with a hash, just use keys and values to extract the first names and last names. To extract the names from a string, just add capture groups and /g to find all the matches:



              #!/usr/bin/perl
              
use warnings;
              
use strict;
              
use feature qw{ say };
              

              
my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);
              

              
say join ' ', 'First names:', keys %names;
              
say join ' ', 'Last names:', values %names;
              

              
my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";
              

              
my (@first_names, @last_names);
              
while ($scalar_string =~ /([w']+) ([w']+)/g) {
              
    push @first_names, $1;
              
    push @last_names, $2;
              
}
              
say join ' ', 'First names:', @first_names;
              
say join ' ', 'Last names:', @last_names;





              share|improve this answer


























                4












                4








                4







                If you start with a hash, just use keys and values to extract the first names and last names. To extract the names from a string, just add capture groups and /g to find all the matches:



                #!/usr/bin/perl
                
use warnings;
                
use strict;
                
use feature qw{ say };
                

                
my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);
                

                
say join ' ', 'First names:', keys %names;
                
say join ' ', 'Last names:', values %names;
                

                
my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";
                

                
my (@first_names, @last_names);
                
while ($scalar_string =~ /([w']+) ([w']+)/g) {
                
    push @first_names, $1;
                
    push @last_names, $2;
                
}
                
say join ' ', 'First names:', @first_names;
                
say join ' ', 'Last names:', @last_names;





                share|improve this answer













                If you start with a hash, just use keys and values to extract the first names and last names. To extract the names from a string, just add capture groups and /g to find all the matches:



                #!/usr/bin/perl
                
use warnings;
                
use strict;
                
use feature qw{ say };
                

                
my %names = qw (hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond);
                

                
say join ' ', 'First names:', keys %names;
                
say join ' ', 'Last names:', values %names;
                

                
my $scalar_string = "hanibal lecter Harry Potter INDIANA JONES Sarah connor scarlet O'Hara JAMES Bond";
                

                
my (@first_names, @last_names);
                
while ($scalar_string =~ /([w']+) ([w']+)/g) {
                
    push @first_names, $1;
                
    push @last_names, $2;
                
}
                
say join ' ', 'First names:', @first_names;
                
say join ' ', 'Last names:', @last_names;






                share|improve this answer












                share|improve this answer



                share|improve this answer










                answered Nov 25 '18 at 11:05









                chorobachoroba

                160k15142212




                160k15142212
































                    draft saved

                    draft discarded




















































                    Thanks for contributing an answer to Stack Overflow!


                    • Please be sure to answer the question. Provide details and share your research!

                    But avoid …



                    • Asking for help, clarification, or responding to other answers.

                    • Making statements based on opinion; back them up with references or personal experience.


                    To learn more, see our tips on writing great answers.




                    draft saved


                    draft discarded














                    StackExchange.ready(
                    function () {
                    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53466759%2fhow-to-get-all-individual-matches-from-a-regex-in-perl%23new-answer', 'question_page');
                    }
                    );

                    Post as a guest















                    Required, but never shown





















































                    Required, but never shown














                    Required, but never shown












                    Required, but never shown







                    Required, but never shown

































                    Required, but never shown














                    Required, but never shown












                    Required, but never shown







                    Required, but never shown







                    -

                    這個網誌中的熱門文章

                    Xamarin.form Move up view when keyboard appear

                    圖片
                    .everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty{ height:90px;width:728px;box-sizing:border-box; } 0 I'm trying to build a Chat app UI, the idea of the Layout was pretty simple: When the input bar is focused, keyboard show up and "push" up the chat bar, as it's a grid, the ListView will resize to fit the screen: I update the input bar's margin to "push" it up: NSValue result = (NSValue)args.Notification.UserInfo.ObjectForKey(new NSString(UIKeyboard.FrameEndUserInfoKey)); CGSize keyboardSize = result.RectangleFValue.Size; if (Element != null){ Element.Margin = new Thickness(0, 0, 0,keyboardSize.Height); //push the entry up to keyboard height when keyboard is activated } And this is ...
                    閱讀完整內容

                    Post-Redirect-Get with Spring WebFlux and Thymeleaf

                    圖片
                    .everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty{ height:90px;width:728px;box-sizing:border-box; } 2 Can someone explain to me how to implement the post-redirect-get pattern in Spring WebFlux and Thymeleaf? What subscribes on the database save method? @GetMapping("/register") public String showRegisterForm(Model model) { model.addAttribute("user", new User()); return "register"; } @PostMapping public String processRegisterForm(@Valid User user, BindingResult bindingResult) { if (bindingResult.hasErrors()) { return "register"; } else { userRepository.save(user); //what subscribes on this? //how to redirect on e.g. "/login"? ...
                    閱讀完整內容

                    Anylogic : not able to use stopDelay()

                    圖片
                    -2 I am building a railway station model. I want a train to depart when I click a button. I want to call stopDelay() for that but I am not sure how to do that and from which place. anylogic share | improve this question asked Nov 23 '18 at 10:12 Anupam Singh Anupam Singh 1 Hi Anupam, welcome to SOF. Please check how to ask good questions, see link below. Your question is...
                    閱讀完整內容