File Coverage

blib/lib/Faker/Plugin/EnUs/CompanyDescription.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Faker::Plugin::EnUs::CompanyDescription;
2              
3 2     2   40060 use 5.018;
  2         9  
4              
5 2     2   13 use strict;
  2         6  
  2         45  
6 2     2   11 use warnings;
  2         4  
  2         56  
7              
8 2     2   12 use Venus::Class 'base';
  2         5  
  2         23  
9              
10             base 'Faker::Plugin::EnUs';
11              
12             # VERSION
13              
14             our $VERSION = '1.19';
15              
16             # METHODS
17              
18             sub execute {
19 6     6 1 1137 my ($self, $data) = @_;
20              
21 6         20 my $does = $self->faker->random->select([
22             'Delivers',
23             'Delivering',
24             'Excels at',
25             'Offering',
26             'Best-in-class for',
27             'Provides',
28             'Providing',
29             ]);
30              
31 6         206 return join ' ', $does,
32             $self->faker->jargon_term_prefix,
33             $self->faker->jargon_adverb,
34             $self->faker->jargon_term_suffix;
35             }
36              
37             1;
38              
39              
40              
41             =head1 NAME
42              
43             Faker::Plugin::EnUs::CompanyDescription - Company Description
44              
45             =cut
46              
47             =head1 ABSTRACT
48              
49             Company Description for Faker
50              
51             =cut
52              
53             =head1 VERSION
54              
55             1.19
56              
57             =cut
58              
59             =head1 SYNOPSIS
60              
61             package main;
62              
63             use Faker::Plugin::EnUs::CompanyDescription;
64              
65             my $plugin = Faker::Plugin::EnUs::CompanyDescription->new;
66              
67             # bless(..., "Faker::Plugin::EnUs::CompanyDescription")
68              
69             =cut
70              
71             =head1 DESCRIPTION
72              
73             This package provides methods for generating fake data for company description.
74              
75             =encoding utf8
76              
77             =cut
78              
79             =head1 INHERITS
80              
81             This package inherits behaviors from:
82              
83             L
84              
85             =cut
86              
87             =head1 METHODS
88              
89             This package provides the following methods:
90              
91             =cut
92              
93             =head2 execute
94              
95             execute(HashRef $data) (Str)
96              
97             The execute method returns a returns a random fake company description.
98              
99             I>
100              
101             =over 4
102              
103             =item execute example 1
104              
105             package main;
106              
107             use Faker::Plugin::EnUs::CompanyDescription;
108              
109             my $plugin = Faker::Plugin::EnUs::CompanyDescription->new;
110              
111             # bless(..., "Faker::Plugin::EnUs::CompanyDescription")
112              
113             # my $result = $plugin->execute;
114              
115             # "Excels at full-range synchronised implementations";
116              
117             # my $result = $plugin->execute;
118              
119             # "Provides logistical ameliorated methodologies";
120              
121             # my $result = $plugin->execute;
122              
123             # "Offering hybrid future-proofed applications";
124              
125             =back
126              
127             =cut
128              
129             =head2 new
130              
131             new(HashRef $data) (Plugin)
132              
133             The new method returns a new instance of the class.
134              
135             I>
136              
137             =over 4
138              
139             =item new example 1
140              
141             package main;
142              
143             use Faker::Plugin::EnUs::CompanyDescription;
144              
145             my $plugin = Faker::Plugin::EnUs::CompanyDescription->new;
146              
147             # bless(..., "Faker::Plugin::EnUs::CompanyDescription")
148              
149             =back
150              
151             =cut
152              
153             =head1 AUTHORS
154              
155             Awncorp, C
156              
157             =cut
158              
159             =head1 LICENSE
160              
161             Copyright (C) 2000, Al Newkirk.
162              
163             This program is free software, you can redistribute it and/or modify it under
164             the terms of the Apache license version 2.0.
165              
166             =cut