1P(1)                  User Contributed Perl Documentation                 P(1)
2
3
4

NAME

6       p - Steroids for your perl one-liners.
7

VERSION

9       version 0.0400
10

SYNOPSIS

12           Usage: p [-lneE etc] 'code'
13               The code can make use of:
14               r   to File::Slurper::read_text()
15               w   to File::Slurper::write_file()
16               S   to say()
17               p   to print()
18               dd  to Data::Dump::dd()
19               jd  to JSON::encode (utf8/pretty)
20               jl  to JSON::decode (utf8/allow nonref) a thing
21               xd  to XML::Hash::LX::hash2xml()
22               xl  to XML::Hash::LX::xml2hash()
23               yd  to YAML::Dump()
24               yl  to YAML::Load()
25               xj  to convert an xml file to json
26               jx  to convert a json file to xml
27               get,head,getprint,getstore,mirror from LWP::Simple
28               sum,first,min,max,zip,uniq,any,all,none ... all of List::AllUtils
29
30           Examples:
31
32           p 'dd [File::Spec->path]'   # dynamically load arbitrary modules
33           p -pe 's/foo/bar/' foo.txt  # use your favorite options like -lane
34           p 'say "hello world!"'      # -E is assumed if no options are provided
35           p 'dd yl r "config.yml"'    # chain commands
36           p 'S sum 1,2,3,4'           # all of List::AllUtils is at your fingertips
37           p 'dd ExtUtils::Installed->new->modules' # list all installed modules
38           p '  dd xl r "/etc/xml/xml-core.xml"'    # print dump of hash converted xml
39           p 'p xd xl r "/etc/xml/xml-core.xml"'    # print xml converted from hash
40           p 'p get "http://icanhazip.com"'         # print contents of url
41           p 'p xj "file.xml"          #   (xj xml to json )print xml's equivalent json
42           p 'p jx "file.json"         #   (jx json to xml )print json's equivalent xml
43           p 'dd uniq map $_->{ostext}, @{ jl get "http://www.cpantesters.org/distro/A/App-p.json" }' # have fun!
44

CONTRIBUTORS

46       •   datamuc <<https://github.com/datamuc>>
47
48       •   Jenish Gnanasicamani <<https://github.com/JenishGnanasicamani>>
49
50       •   Stanislaw Pusep <<https://github.com/creaktive>>
51
52       •   Stefan Corneliu Petrea <<https://github.com/wsdookadr>>
53
54       •   Tommy Stanton <<https://github.com/tommystanton>>
55

ACKNOWLEDGEMENTS

57       This is based on Randy Stauner's
58       <http://blogs.perl.org/users/randy_stauner/2011/06/exploratory-one-liners-with-less-typing.html>
59       and Marco Fontani's <https://gist.github.com/1042504>.
60

AUTHOR

62       Naveed Massjouni <naveed@vt.edu>
63

65       This software is copyright (c) 2011 by Naveed Massjouni.
66
67       This is free software; you can redistribute it and/or modify it under
68       the same terms as the Perl 5 programming language system itself.
69
70
71
72perl v5.38.0                      2023-07-20                              P(1)
Impressum