| Apache-AxKit-Language-XSP-ObjectTaglib documentation | Contained in the Apache-AxKit-Language-XSP-ObjectTaglib distribution. |
AxKit::XSP::ObjectTaglib::Demo::Course - A mock course object
use AxKit::XSP::ObjectTaglib::Demo::Course;
use strict;
use warnings;
my $course = AxKit::XSP::ObjectTaglib::Demo::Course->new();
print $course->name;
This module represents a generic Course object returned by
AxKit::XSP::ObjectTaglib::Demo::Courses->load for use within
the AxKit::XSP::ObjectTaglib::Demo Taglib.
Returns a new AxKit::XSP::ObjectTaglib::Demo::Course object. You can
also pass in an optional hashref to be blessed into the new object.
my $course = AxKit::XSP::ObjectTaglib::Demo::Course->new({
name => 'Course 100: Easy Course',
code => 100
});
Returns the name of the given AxKit::XSP::ObjectTaglib::Demo::Course
object.
print $course->name;
Returns the course code of the given AxKit::XSP::ObjectTaglib::Demo::Course
object.
print $course->code;
Returns the summary description of the given
AxKit::XSP::ObjectTaglib::Demo::Course object.
print $course->summary;
Returns the description of the given
AxKit::XSP::ObjectTaglib::Demo::Course object.
print $course->description;
Returns an array of prerequisite objects of the given
AxKit::XSP::ObjectTaglib::Demo::Course object.
my @prerequisites = $course->prerequisites;
for (@preequisites) {
print $_->name;
print $_->code;
};
See AxKit::XSP::ObjectTaglib::Demo::Prerequisite for more information about the objects returned.
Returns an array of presentation objects of the given
AxKit::XSP::ObjectTaglib::Demo::Course object.
my @presentations = $course->presentations;
for (@presentations) {
print $_->name;
print $_->calculatedSize;
};
See AxKit::XSP::ObjectTaglib::Demo::Presentation for more information about the objects returned.
Returns an array of resource objects of the given
AxKit::XSP::ObjectTaglib::Demo::Course object.
my @resources = $course->resources;
for (@resources) {
print $_->name;
};
See AxKit::XSP::ObjectTaglib::Demo::Resource for more information about the objects returned.
AxKit::XSP::ObjectTaglib::Demo, Apache::AxKit::Language::XSP::ObjectTaglib, AxKit::XSP::ObjectTaglib::Demo::Courses
Christopher H. Laco
CPAN ID: CLACO
claco@chrislaco.com
http://today.icantfocus.com/blog/
| Apache-AxKit-Language-XSP-ObjectTaglib documentation | Contained in the Apache-AxKit-Language-XSP-ObjectTaglib distribution. |
# $Id: /local/CPAN/Apache-AxKit-Language-XSP-ObjectTaglib/lib/AxKit/XSP/ObjectTaglib/Demo/Course.pm 1508 2005-03-10T02:56:40.581331Z claco $ package AxKit::XSP::ObjectTaglib::Demo::Course; use strict; use warnings; sub new { my $class = shift; my $attr = shift || {}; my $self = bless $attr, $class; return $self; }; sub name { return shift->{name}; }; sub code { return shift->{code}; }; sub summary { return shift->{summary}; }; sub description { return shift->{description}; }; sub prerequisites { my @prerequisites; require AxKit::XSP::ObjectTaglib::Demo::Prerequisite; push @prerequisites, AxKit::XSP::ObjectTaglib::Demo::Prerequisite->new({ name => 'Prerequisite 1 for ' . shift->{name}, code => 'p123' }); return @prerequisites; }; sub presentations { my @presentations; require AxKit::XSP::ObjectTaglib::Demo::Presentation; push @presentations, AxKit::XSP::ObjectTaglib::Demo::Presentation->new({ size => shift->{code} }); return @presentations; }; sub resources { my @resources; require AxKit::XSP::ObjectTaglib::Demo::Resource; push @resources, AxKit::XSP::ObjectTaglib::Demo::Resource->new({ name => 'Resource ' . shift->{code} }); return @resources; }; 1; __END__