http://qs321.pair.com?node_id=1213345


in reply to Re^2: REGEX help
in thread REGEX help

Take the spaces out of $letters and you should get

$prot_object = bless( { 'primary_seq' => bless( { 'length' => 63, '_root_verbose' => 0 +, '_nowarnonempty' => +undef, 'seq' => 'MGPTSQPTLH +PQNHAGIGLRKGKHLCVAYEPFLYLLLSQQGRKREEAAVERIRLREVGISLL*', 'alphabet' => 'prote +in' }, 'Bio::PrimarySeq' ) +, '_root_verbose' => 0 }, 'Bio::Seq' );

whatever that means !

poj

Replies are listed 'Best First'.
Re^4: REGEX help
by dorko (Prior) on Apr 21, 2018 at 19:31 UTC
    karlgoethebier and poj,

    Thank you for cleaning up my mess and throwing the code over the finish line.

    Cheers,

    Brent

    -- Yeah, I'm a Delt.

      Why are you so mad, Bront?

      It's good code, Brant.

      (Appologies to Brent and WeRateDogs™)

        Not mad at all. My apologies to all. Just an attempt at self deprecating humor that fell flat. I revised that 2-3 times before I published it and still didn't get it quite right. :(

        I did sincerely appreciate karlgoethebier's and poj's help getting things running. I knew I was close, but I didn't install Bio::Seq.

        Everyone please have a good weekend.

        Cheers,

        Brent

        -- Yeah, I'm a Delt.
        Didn't sound mad to me. However, sometimes I get similiar reactions when trying to be witty...

      Forget about the mess and let' go for a sunday roast bro. Best regards, Karl

      «The Crux of the Biscuit is the Apostrophe»

      perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help

Re^4: REGEX help
by karlgoethebier (Abbot) on Apr 21, 2018 at 19:22 UTC
    "Take the spaces out...whatever..."

    D'oh! Thanks and best regards, Karl

    «The Crux of the Biscuit is the Apostrophe»

    perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help