PlusPlus

PlusPlus is a Delphi, VB, Java-like Perl preprocessor.
Download

PlusPlus Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • D. E. Ovsyanko
  • Publisher web site:
  • http://search.cpan.org/~dmow/PlusPlus-1.23/PlusPlus.pm

PlusPlus Tags


PlusPlus Description

PlusPlus is a Delphi, VB, Java-like Perl preprocessor. PlusPlus is a Delphi, VB, Java-like Perl preprocessor.SYNOPSIS ### Case 1: plain script use PlusPlus; /* This is a long awaited multiline comment */ my $nested_hash = {outer => {inner => {a => 1, b => , c => 3}}} $nested_hash.outer.inner.a = 5; # colon in variable names $nested_hash.outer.inner.b. = 37; $dbh.do ("DROP DATABASE TEST"); # colon in method names with ($nested_hash.outer.inner) { # 'with' operator ($.a, $.c) = (10, 30); print " b = $.b.n"; }; function f ($x, $y = 0) { # named parameters and default values return sin ($x) * cos ($y) }; ### Case 2: working with a database use PlusPlus; use DBI; my $dbh = DBI -> connect ($dsn, $user, $password); select name, phone from staff where salary between ? and ? -> my $sth; forsql $sth (1000, 1500) { print "< tr > < td > $.name < /td > < td > $.phone < /td > < /tr >" } ### Case 3: procedural module use PlusPlus; module Child (Ancestor::Mother, Ancestor::Father); sub foo { ... }; # not exported export sub bar { ... }; # exported by default export_ok sub baz { ... }; # can be imported explicitly ### Case 4: class class Child (Ancestor::Mother, Ancestor::Father); method init { # constructor callback ($.x, $.y) = (10, 3); } method diag { # some method sqrt ($.x * $.x + $.y * $.y) } method do_it_to_me ($coderef) { # one more method &$coderef ($self); } getter fldname { # getter method print "They asked my value!n"; return $.fldname; } setter fldname ($value) { # setter method $.setting_counter ++; $.fldname = $value; }Requirements:· Perl Requirements: · Perl


PlusPlus Related Software