mirror of
https://github.com/emilybache/GildedRose-Refactoring-Kata.git
synced 2025-12-12 20:32:15 +00:00
17 lines
242 B
Perl
17 lines
242 B
Perl
package Item;
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
sub new {
|
|
my ( $class, %attrs ) = @_;
|
|
return bless \%attrs, $class;
|
|
}
|
|
|
|
sub to_string {
|
|
my ($self) = @_;
|
|
return $self->{name} . ', ' . $self->{sell_in} . ', ' . $self->{quality};
|
|
}
|
|
|
|
1;
|