aboutsummaryrefslogtreecommitdiff
path: root/lib/App/Glacier/Job.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/App/Glacier/Job.pm')
-rw-r--r--lib/App/Glacier/Job.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/App/Glacier/Job.pm b/lib/App/Glacier/Job.pm
index ae12b22..9478b20 100644
--- a/lib/App/Glacier/Job.pm
+++ b/lib/App/Glacier/Job.pm
@@ -108,6 +108,11 @@ sub get {
108 return $job->{$key}; 108 return $job->{$key};
109} 109}
110 110
111sub as_string { shift->get('JobDescription') }
112
113use overload
114 '""' => \&as_string;
115
111sub is_finished { 116sub is_finished {
112 my $self = shift; 117 my $self = shift;
113 return defined($self->get('StatusCode')); 118 return defined($self->get('StatusCode'));

Return to:

Send suggestions and report system problems to the System administrator.