Linux web0273.sh.tyo1 4.18.0-553.141.2.lve.el7h.x86_64 #1 SMP Wed Jul 8 17:20:31 UTC 2026 x86_64
Apache
: 127.0.0.1 | : 216.73.216.229
Cant Read [ /etc/named.conf ]
8.3.31
r2745769
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
lib64 /
perl5 /
vendor_perl /
PDL /
[ HOME SHELL ]
Name
Size
Permission
Action
Core
[ DIR ]
drwxr-xr-x
Demos
[ DIR ]
drwxr-xr-x
Doc
[ DIR ]
drwxr-xr-x
Filter
[ DIR ]
drwxr-xr-x
Fit
[ DIR ]
drwxr-xr-x
GIS
[ DIR ]
drwxr-xr-x
GSL
[ DIR ]
drwxr-xr-x
GSLSF
[ DIR ]
drwxr-xr-x
Graphics
[ DIR ]
drwxr-xr-x
IO
[ DIR ]
drwxr-xr-x
NiceSlice
[ DIR ]
drwxr-xr-x
Opt
[ DIR ]
drwxr-xr-x
PP
[ DIR ]
drwxr-xr-x
Perldl2
[ DIR ]
drwxr-xr-x
Transform
[ DIR ]
drwxr-xr-x
API.pod
12.28
KB
-rw-r--r--
AutoLoader.pm
8.46
KB
-rw-r--r--
Bad.pm
17.23
KB
-rw-r--r--
BadValues.pod
26.23
KB
-rw-r--r--
Basic.pm
17.84
KB
-rw-r--r--
Bugs.pod
4.5
KB
-rw-r--r--
CallExt.pm
7.24
KB
-rw-r--r--
Char.pm
8.07
KB
-rw-r--r--
Complex.pm
29.77
KB
-rw-r--r--
Compression.pm
5.86
KB
-rw-r--r--
Config.pm
1.24
KB
-rw-r--r--
Constants.pm
1.46
KB
-rw-r--r--
Core.pm
104.62
KB
-rw-r--r--
Course.pod
16.18
KB
-rw-r--r--
Dataflow.pod
7.23
KB
-rw-r--r--
Dbg.pm
4.73
KB
-rw-r--r--
Delta.pod
1.22
KB
-rw-r--r--
DiskCache.pm
10.97
KB
-rw-r--r--
Doc.pm
26.09
KB
-rw-r--r--
Exporter.pm
2.04
KB
-rw-r--r--
FAQ.pod
51.66
KB
-rw-r--r--
FFT.pm
11.63
KB
-rw-r--r--
Func.pm
23.12
KB
-rw-r--r--
Graphics2D.pm
27.52
KB
-rw-r--r--
IO.pod
11.31
KB
-rw-r--r--
Image2D.pm
29.63
KB
-rw-r--r--
ImageND.pm
15.27
KB
-rw-r--r--
ImageRGB.pm
6.59
KB
-rw-r--r--
Index.pod
12.62
KB
-rw-r--r--
Indexing.pod
62.24
KB
-rw-r--r--
Internals.pod
21.15
KB
-rw-r--r--
Lite.pm
1.07
KB
-rw-r--r--
LiteF.pm
921
B
-rw-r--r--
Lvalue.pm
2.06
KB
-rw-r--r--
MATLAB.pod
23.46
KB
-rw-r--r--
Math.pm
11.28
KB
-rw-r--r--
Matrix.pm
9.4
KB
-rw-r--r--
MatrixOps.pm
35.82
KB
-rw-r--r--
Minuit.pm
19.24
KB
-rw-r--r--
Modules.pod
7.81
KB
-rw-r--r--
NiceSlice.pm
34.16
KB
-rw-r--r--
Objects.pod
3.71
KB
-rw-r--r--
Ops.pm
19.89
KB
-rw-r--r--
Options.pm
23.92
KB
-rw-r--r--
PP-Inline.pod
7.95
KB
-rw-r--r--
PP.pm
107.77
KB
-rw-r--r--
PP.pod
85.01
KB
-rw-r--r--
ParallelCPU.pod
6.83
KB
-rw-r--r--
Philosophy.pod
7.19
KB
-rw-r--r--
Primitive.pm
61.17
KB
-rw-r--r--
QuickStart.pod
20.02
KB
-rw-r--r--
Reduce.pm
5.09
KB
-rw-r--r--
Scilab.pod
21.58
KB
-rw-r--r--
Slatec.pm
30.47
KB
-rw-r--r--
Slices.pm
45.97
KB
-rw-r--r--
Tests.pm
1.74
KB
-rw-r--r--
Threading.pod
25.19
KB
-rw-r--r--
Tips.pod
3.43
KB
-rw-r--r--
Transform.pm
95.94
KB
-rw-r--r--
Tutorials.pod
3.54
KB
-rw-r--r--
Types.pm
13.3
KB
-rw-r--r--
Ufunc.pm
30.03
KB
-rw-r--r--
Version.pm
263
B
-rw-r--r--
default.perldlrc
1.32
KB
-rw-r--r--
pdl2.pod
2.05
KB
-rw-r--r--
pdldoc.db
315.05
KB
-rw-r--r--
pdldoc.pod
984
B
-rw-r--r--
perldl.pod
18.7
KB
-rw-r--r--
pptemplate.pod
1.56
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Lvalue.pm
=head1 NAME PDL::Lvalue - declare PDL lvalue subs =head1 DESCRIPTION Declares a subset of PDL functions so that they can be used as lvalue subs. In particular, this allows simpler constructs such as $a->slice(',(0)') .= 1; instead of the clumsy (my $tmp = $a->slice(',(0)')) .= 1; This will only work if your perl supports lvalue subroutines (i.e. versions >= v5.6.0). Note that lvalue subroutines are currently regarded experimental. =head1 SYNOPSIS use PDL::Lvalue; # automatically done with all PDL loaders =head1 FUNCTIONS =cut package PDL::Lvalue; # list of functions that can be used as lvalue subs # extend as necessary my @funcs = qw/ clump diagonal dice dice_axis dummy flat index index2d indexND indexNDb mslice mv nslice nslice_if_pdl nnslice polyfillv px range rangeb reshape sever slice where whereND xchg /; my $prots = join "\n", map {"use attributes 'PDL', \\&PDL::$_, 'lvalue';"} @funcs; =head2 subs =for ref test if routine is a known PDL lvalue sub =for example print "slice is an lvalue sub" if PDL::Lvalue->subs('slice'); returns the list of PDL lvalue subs if no routine name is given, e.g. @lvfuncs = PDL::Lvalue->subs; It can be used in scalar context to find out if your PDL has lvalue subs: print 'has lvalue subs' if PDL::Lvalue->subs; =cut sub subs { my ($type,$func) = @_; if (defined $func) { $func =~ s/^.*:://; return ($^V and $^V >= 5.006007) && scalar grep {$_ eq $func} @funcs; } else { return ($^V and $^V >= 5.006007) ? @funcs : (); } } # print "defining lvalue subs:\n$prots\n"; eval << "EOV" if ($^V and $^V >= 5.006007); { package PDL; no warnings qw(misc); $prots } EOV =head1 AUTHOR Copyright (C) 2001 Christian Soeller (c.soeller@auckland.ac.nz). All rights reserved. There is no warranty. You are allowed to redistribute this software / documentation under certain conditions. For details, see the file COPYING in the PDL distribution. If this file is separated from the PDL distribution, the copyright notice should be included in the file. =cut 1;
Close
