/*MerryChristmas.c*/
Gérard Milmeister
gemi at bluewin.ch
Mon Dec 29 21:31:55 UTC 2008
On Sun, 2008-12-28 at 21:50 -0500, Casey Dahlin wrote:
> Arthur Pemberton wrote:
> > On Wed, Dec 24, 2008 at 3:11 PM, Rodrigo Padula de Oliveira
> > <rodrigopadula at projetofedora.org> wrote:
> >
> >> /*MerryChristmas.c*/
> >> void main (int argc, char* argv[])
> >> {
> >> printf("\n Merry Christmas! \n");
> >> if (strcmp(argv[1],"girl") == 0) /*general idea*/
> >> printf("Kisses! \n");
> >> else
> >> printf("Hugs! \n");
> >> }
> >>
> >
> >
> > #i!/bin/env python
> > import sys
> > print 'Kisses!' if len(sys.argv) == 2 and sys.argv[1].lower() ==
> > 'girl' else 'Hugs!'
> >
> >
> #! /usr/bin/env ruby
>
> class Object
> def response
> "Hugs!"
> end
> end
>
> class String
> def response
> return "Kisses!" if self.downcase == "girl"
> super
> end
> end
>
> puts "Merry Christmas!\n#{ARGV[0].response}"
#!/usr/bin/sbcl --script
(princ #\newline)
(princ "Merry Christmas!")
(princ #\newline)
(let ((argv sb-ext:*posix-argv*))
(if (> (length argv) 1)
(let ((type (string-downcase (cadr argv))))
(if (equal type "girl")
(princ "Kisses!")
(princ "Hugs!")))))
(princ #\newline)
More information about the fedora-devel-list
mailing list