Help for this page

Select Code to Download


  1. or download this
    use constant { FOO => 0, BAR => 1 };
    
  2. or download this
    sub Point3D::new( CLASS, X, Y, Z ) {
        return bless [ @_[ X, Y, Z ] ], $_[ CLASS ];
    }