- or download this
package PointX;
...
} # end of internal scoping.
1;
- or download this
package PointX;
...
} # end of internal scoping.
1;
- or download this
#!/usr/bin/perl
...
print "The x cord is ".$point->get_x()."\n";
print "The y cord is ".$point->get_y()."\n";
- or download this
The x cord is 3
The y cord is 20
The x cord is 10
The y cord is 20