1DBIx::Class::Helper::ReUssuelrtSCeotn:t:rBiabruet(e3d)PDeBrIlx:D:oCcluamsesn:t:aHteilopner::ResultSet::Bare(3)
2
3
4
6 DBIx::Class::Helper::ResultSet::Bare - Get an unsearched ResultSet
7
9 package MyApp::Schema::ResultSet::KV;
10
11 __PACKAGE__->load_components(qw{Helper::ResultSet::Bare});
12
13 sub set_value {
14 my ($self, $key, $value) = @_;
15
16 $self->bare->create_or_update({
17 key => $key,
18 value => $value,
19 });
20 }
21
22 1;
23
25 Once in a blue moon you will find yourself in the frustrating position
26 of needing a vanilla ResultSet when all you have is a ResultSet that
27 has a search applied to it. That's what this helper is for; it gives
28 you a method to get at an unsearched version of the ResultSet.
29
31 "bare"
32 my $plain_rs = $searched_rs->bare;
33
34 Takes no arguments and returns the ResultSet as if nothing were
35 searched against it at all.
36
38 Arthur Axel "fREW" Schmidt <frioux+cpan@gmail.com>
39
41 This software is copyright (c) 2019 by Arthur Axel "fREW" Schmidt.
42
43 This is free software; you can redistribute it and/or modify it under
44 the same terms as the Perl 5 programming language system itself.
45
46
47
48perl v5.30.1 2020-0D1B-I2x9::Class::Helper::ResultSet::Bare(3)