Loading ...
Sorry, an error occurred while loading the content.
 

Re: [PBML] Counting Characters of word?

Expand Messages
  • tnas
    Use the function length . For example: my $crt = ab13#&c ; my $num_crt = length $crt; HTH ... -- Thiago Nascimento #!/usr/bin/perl $_= tMM naaCt
    Message 1 of 3 , Oct 5, 2006
      Use the function 'length'. For example:

      my $crt = 'ab13#&c';
      my $num_crt = length $crt;

      HTH

      Marcos Onisto escreveu:
      >
      > Hello All,
      >
      > How can i count how many characters one word have?
      > There is a function done that make this?
      > Have someone ever made some like this?
      >
      > I appreciate some helps,
      >
      > Thanks a lot!
      >
      > Marcos Luiz Onisto
      >
      >
      > ---------------------------------
      > Do you Yahoo!?
      > Get on board. You're invited to try the new Yahoo! Mail.
      >
      > [Non-text portions of this message have been removed]
      >
      >

      --
      Thiago Nascimento
      #!/usr/bin/perl
      $_="tMM naaCt Feocmama_itpUilucoGa";$_.=$1,print $2 while s/(..)(.)//;print substr$_,1,1;
    • Marcos Onisto
      Thanks a lot. tnas wrote: Use the function length . For example: my $crt = ab13#&c ; my
      Message 2 of 3 , Oct 5, 2006
        Thanks a lot.

        tnas <nascimentothiago@...> wrote: Use the function 'length'. For example:

        my $crt = 'ab13#&c';
        my $num_crt = length $crt;

        HTH

        Marcos Onisto escreveu:
        >
        > Hello All,
        >
        > How can i count how many characters one word have?
        > There is a function done that make this?
        > Have someone ever made some like this?
        >
        > I appreciate some helps,
        >
        > Thanks a lot!
        >
        > Marcos Luiz Onisto
        >
        >
        > ---------------------------------
        > Do you Yahoo!?
        > Get on board. You're invited to try the new Yahoo! Mail.
        >
        > [Non-text portions of this message have been removed]
        >
        >

        --
        Thiago Nascimento
        #!/usr/bin/perl
        $_="tMM naaCt Feocmama_itpUilucoGa";$_.=$1,print $2 while s/(..)(.)//;print substr$_,1,1;






        ---------------------------------
        Get your own web address for just $1.99/1st yr. We'll help. Yahoo! Small Business.

        [Non-text portions of this message have been removed]
      Your message has been successfully submitted and would be delivered to recipients shortly.