Scripts posted recently tagged to perl in Kelpi

1- 10 of 11.

Highlight

to perl highlight pipe unix-style by kaoru 

#!/usr/bin/perl -w
#
# pipe text to highlight.pl to highlight certain words
#
# eg. cat nastyfile.pl | highlight words you want

Check Perl

to perl checkperl syntax by kaoru 

#!/usr/bin/perl -w
#
# Checks the syntax of .pl and .pm scripts using perl -cw
# Will check all .pl and .pm files in $PWD with no arguments
#

A Kelpi API wrapper in Perl

to perl api wrapper kelpi by spiros 

#!/usr/bin/perl 
use warnings;
use strict;
use Data::Dumper;
use HTTP::Request::Common;

kelpi api example

to perl api example by spiros 

#!/usr/bin/perl -w
use strict;
print "This is an example!\n";

Hello world in Perl

to hello-world perl by spiros 

#!/usr/bin/perl 
use warnings ;
use strict ;
print 'Hello, World!' . "\n" ;

Multi-language hello world

to c c++ bash perl tcl perl4 perl5 hello-world by nando.quintana 

#define NAME			hello.c
#define DESCRIP 		many languages at once (tcl, perl 4 & 5, sh, C) http://www.ee.ryerson.ca/~elf/hack/multilang.html
#define AUTHOR			Jeremy Dilatush
#define DATE			7/31/96
#define dummy \

Ejemplo básico de expresiones regulares en perl

to perl regular-expresions by nando.quintana 

# http://www.e-ghost.deusto.es/docs/2005/cursillos/Perl/perl.pdf
#
# $`, $& y $': toman valor del resultado de un patrĂ³n de busqueda.
$_ = 'prueba de concepto';
/de/;

time in perl

to perl time by nando.quintana 

$numero_proceso = $$;
$string = 'Jul 18 11:47:03 cursillos';
if ($string =~ /(..):(..):(..)/){
  print "Hora: $1\n";
  print "Minuto: $2\n";

Hello World in perl

to perl hello-world by nando.quintana 

#!/usr/bin/perl
print "Hello World!\n"

a better Perl album lister for Freebase

to perl freebase by nando.quintana 

#!/usr/bin/perl -w
use strict;           # Don't allow sloppy syntax
use JSON;             # JSON encoding and decoding
use URI::Escape;      # URI encoding
use LWP::UserAgent;   # High-level HTTP API
hits counter