diff options
Diffstat (limited to 'lib/App/Glacier/Job.pm')
-rw-r--r-- | lib/App/Glacier/Job.pm | 5 |
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 | ||
111 | sub as_string { shift->get('JobDescription') } | ||
112 | |||
113 | use overload | ||
114 | '""' => \&as_string; | ||
115 | |||
111 | sub is_finished { | 116 | sub is_finished { |
112 | my $self = shift; | 117 | my $self = shift; |
113 | return defined($self->get('StatusCode')); | 118 | return defined($self->get('StatusCode')); |