mirror of https://github.com/Wilfred/difftastic/
26 lines
440 B
Perl
26 lines
440 B
Perl
# hash needs its own sweet example file
|
|
use strict;
|
|
use warnings;
|
|
use Data::Dumper;
|
|
|
|
my $simple = SimpleModule->new();
|
|
|
|
|
|
my $event = {
|
|
user_id => Data::UUID->new->Something($simple, {}),
|
|
};
|
|
|
|
|
|
my $output = {
|
|
some_property => BaseModule::AtSomeWhere::GetSomething(121, {
|
|
KEY => $var->{there},
|
|
}),
|
|
};
|
|
|
|
my $ter = {
|
|
first => 'something here',
|
|
hello() ? (second => 1) : (third => 'ternary false'),
|
|
};
|
|
|
|
print Dumper $ter->{first};
|