File Coverage

blib/lib/Faker/Plugin/EsEs/CompanyName.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 1 2 50.0
total 21 22 95.4


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