Hi Franklin,

to answer your question:

On Wed, 26 Jun 2013 12:18:42 +0300
Shlomi Fish <shlo...@shlomifish.org> wrote:

> Begin forwarded message:
> 
> Date: Wed, 26 Jun 2013 14:32:39 +0530
> From: Franklin Lawerence <franklin.lawere...@gmail.com>
> To: Shlomi Fish <shlo...@shlomifish.org>
> Subject: Re: Please exempt the book Modern Perl from Web Commercials on
> http://perl-begin.org/
> 
> 
> Hi,
> 
>  Could you please let me know how to reverse a string without using built
> in function.

Do you want to avoid using the http://perldoc.perl.org/functions/reverse.html
built-in function or any built-in function whatsoever? Assuming the latter you
can do this:

[CODE]
#!/usr/bin/perl

use strict;
use warnings;

sub my_reverse
{
    my ($s) = @_;

    my $ret = "";

    for my $idx (0 .. length($s) - 1)
    {
        $ret = substr($s, $idx, 1) . $ret;
    }

    return $ret;
}

my $string = shift(@ARGV);

print "Reversed is:\n", my_reverse($string), "\n";
[/CODE]

Running it gives you:

[SHELL]

shlomif@telaviv1:~$ perl my-reverse.pl Hello
Reversed is:
olleH
shlomif@telaviv1:~$ perl my-reverse.pl Franklin
Reversed is:
nilknarF
shlomif@telaviv1:~$ 

[/SHELL]

Regards,

        Shlomi Fish

> 
> Thanks,
> Frank
> 
> 
> On Thu, Dec 27, 2012 at 5:38 AM, Shlomi Fish <shlo...@shlomifish.org> wrote:
> 
> > Hi chromatic,
> >
> > happy holidays and I hope everything is going well for you.
> >
> > On Fri, 2 Nov 2012 23:11:24 +0200
> > Shlomi Fish <shlo...@shlomifish.org> wrote:
> >
> > > Hi chromatic,
> > >
> > > first of all, thanks for your work on the book Modern Perl , and for
> > allowing
> > > free use and distribution of it.
> > >
> > > Now, I have mirrored a copy of it on
> > > http://perl-begin.org/tutorials/modern-perl/ (latest version, as far as
> > I
> > > know) and there has been some interest in setting up web ads on
> > > http://perl-begin.org/ . These will be non-animated, image (not Adobe
> > Flash)
> > > ads provided by http://www.projectwonderful.com/ which should be as
> > > non-intrusive as possible. Nevertheless, they still stand against Modern
> > > Perl’s non-commercial CC-by-nc-sa licence. So I am requesting you to
> > exempt
> > > http://perl-begin.org/ from this.
> > >
> >
> > I am keeping someone waiting for your approval in order to set up the ads
> > there, because he is interested in publishing ads specifically there. As a
> > result, I would appreciate a response within a timely fashion. Thanks!
> >
> > If you want you can exempt web advertisements completely from the -NC
> > clause of
> > the Creative Commons licence like I did here:
> >
> > http://www.shlomifish.org/meta/copyrights/#cc_by_sa_nc_intr
> >
> > Regards and thanks,
> >
> >         Shlomi Fish
> >
> > > Note that I donated some money to Modern Perl on Onyx Neon Books, and am
> > > willing to make another small donation as a token of my gratitude.
> > >
> > > Please let me know if that is acceptable to you.
> > >
> > > Best regards,
> > >
> > >       Shlomi Fish
> > >
> >
> >
> >
> > --
> > -----------------------------------------------------------------
> > Shlomi Fish       http://www.shlomifish.org/
> > Optimising Code for Speed - http://shlom.in/optimise
> >
> > Real men don’t listen to sentences that start with “Real men don’t”.
> >     — http://whatsup.org.il/article/6023
> >
> > Please reply to list if it's a mailing list post - http://shlom.in/reply .
> >
> > --
> > To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> > For additional commands, e-mail: beginners-h...@perl.org
> > http://learn.perl.org/
> >
> >
> >
> 
> 



-- 
-----------------------------------------------------------------
Shlomi Fish       http://www.shlomifish.org/
Free (Creative Commons) Music Downloads, Reviews and more - http://jamendo.com/

I hope that you agree with me that 99.9218485921% of the users wouldn’t bother
themselves with recompilation (or any other manual step for that matter) to
make their games run 1.27127529900685765% faster ;-) — Nadav Har’El

Please reply to list if it's a mailing list post - http://shlom.in/reply .

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to