Initial start
This commit is contained in:
commit
1b02ac5b52
3 changed files with 46 additions and 0 deletions
1
.gitignore
vendored
Normal file
1
.gitignore
vendored
Normal file
|
@ -0,0 +1 @@
|
|||
*.swp
|
24
lib/Shapeways.pm
Normal file
24
lib/Shapeways.pm
Normal file
|
@ -0,0 +1,24 @@
|
|||
package Shapeways;
|
||||
|
||||
use Moose;
|
||||
|
||||
has mech => (
|
||||
is => 'ro',
|
||||
lazy => 1,
|
||||
default => sub {WWW::Mechanize->new()}, # TODO load config
|
||||
);
|
||||
|
||||
has config => (
|
||||
is => 'ro',
|
||||
lazy => 1,
|
||||
default => {},
|
||||
);
|
||||
|
||||
sub fetch_user {
|
||||
}
|
||||
|
||||
sub fetch_item {
|
||||
}
|
||||
|
||||
sub fetch_list { # Do these exist? maybe this is a cart?
|
||||
}
|
21
lib/Shapeways/Item.pm
Normal file
21
lib/Shapeways/Item.pm
Normal file
|
@ -0,0 +1,21 @@
|
|||
package Shapeways::Item;
|
||||
|
||||
use Moose;
|
||||
|
||||
# zip contents? or is this better as a URL?
|
||||
has file => (
|
||||
);
|
||||
|
||||
has title => (
|
||||
);
|
||||
|
||||
has description => (
|
||||
);
|
||||
|
||||
sub serialize {
|
||||
my $self = shift;
|
||||
my %opts = @_;
|
||||
# Download the file, rename it via the title, save a corrosponding .txt file with the description, title and original file name
|
||||
|
||||
|
||||
}
|
Loading…
Add table
Reference in a new issue