10 More Discussions You Might Find Interesting
1. Solaris
Hi
I have the following file system, that needs to be expanded to more 500Gb, so a total of 1Tb:
df -h /oradata1
Filesystem Size Used Available Capacity Mounted on
oradata1 587G 517G 69G 89% /oradata1
I am not familiar with zfs, I am more... (17 Replies)
Discussion started by: fretagi
17 Replies
2. Shell Programming and Scripting
Why I get bad replace when using eval?
$ map0=( "0" "0000" "0")
$ i=0
$ eval echo \${map$i}
0000
$ a=`eval echo \${map$i}` !!!error happens!!!
bash: ${map$i}: bad substitution
How to resolve it ?
Thanks! (5 Replies)
Discussion started by: 915086731
5 Replies
3. Solaris
Dear Gurus of Unix.
When I Put this command:
# iostat -E
cmdk0 Soft Errors: 0 Hard Errors: 0 Transport Errors: 0
Model: SAMSUNG SV4012H Revision: Serial No: 0540J1BTC53208 Size: 40.06GB <40060403712 bytes>
Media Error: 0 Device Not Ready: 0 No Device: 0 Recoverable: 0
Illegal... (6 Replies)
Discussion started by: andresguillen
6 Replies
4. Virtualization and Cloud Computing
This process was collected by trial and error (mostly error) since most of the documents I found on the 'net were incomplete.
The cookbook/walkthrough on how to grow an Array on EBS at AWS...
# walkthrough by John Jones (jjones at cirrhus9 dot com)
umount /dev/md0
mdadm --stop /dev/md0... (0 Replies)
Discussion started by: Habitual
0 Replies
5. AIX
Hi,
I have an iSCSI LUN attached to an AIX 5.3 box. It's initial size is 250GB, I just grew it on the SAN to 300GB, but AIX is not seeing the change. Right now I have some processes going and it's eating up the disk space. I need to grow this lun by atleast 30GB otherwise the process with bomb... (5 Replies)
Discussion started by: bbbngowc
5 Replies
6. UNIX for Dummies Questions & Answers
I have a 146Gb drive and want to grow the size from 12G to the max available left. I think 20G is being used so I want to max out from 12 G to 126G. Is this possible? Can you help with the command.
root@WRPDWI6k-BU # df -h
Filesystem size used avail... (3 Replies)
Discussion started by: udubya
3 Replies
7. Solaris
Hi,
this is solaris 10 on sparc sf280r, 2 disks mirrored using SVM,
swap is 4GB (slice 1) and rest all is given for / (slice0) in 36G disk.
I have already mirrored disks using SVM, for clear picture, I'm pasting some part of config below,
# Slice 0
metainit -f d110 1 1 c1t0d0s0... (2 Replies)
Discussion started by: upengan78
2 Replies
8. Solaris
Hi, how to grow a filesystem when the 2 disks are mirrored using hardware RAID? Only 100G out of 136G is used for now.
I would like to increase one of the slices by adding the 36G of space.
Pls assist. I only know of using growfs on mirrored disks using SVM.(soft mirror) (12 Replies)
Discussion started by: incredible
12 Replies
9. SuSE
Hi all,
I am using SLES 9 and have following partitions mounted
I would like to make /var 10G atleast.
fdisk -l
This system is doing RAID5(HW).
Can someone help me with this issue?
Thanks (4 Replies)
Discussion started by: upengan78
4 Replies
10. What is on Your Mind?
Hi, all!
I've been working for one year as a Unix systems engineer(Solaris) in a large company.
Two days ago I found, that I didn't exactly know where should I grow up?
I can't drop this idea away and I'm still thinking about it. I'm trying to imagine myself in a next year.
Available... (1 Reply)
Discussion started by: movx
1 Replies
TAP::Parser::Source::Perl(3pm) Perl Programmers Reference Guide TAP::Parser::Source::Perl(3pm)
NAME
TAP::Parser::Source::Perl - Stream Perl output
VERSION
Version 3.17
SYNOPSIS
use TAP::Parser::Source::Perl;
my $perl = TAP::Parser::Source::Perl->new;
my $stream = $perl->source( [ $filename, @args ] )->get_stream;
DESCRIPTION
Takes a filename and hopefully returns a stream from it. The filename should be the name of a Perl program.
Note that this is a subclass of TAP::Parser::Source. See that module for more methods.
METHODS
Class Methods
"new"
my $perl = TAP::Parser::Source::Perl->new;
Returns a new "TAP::Parser::Source::Perl" object.
Instance Methods
"source"
Getter/setter the name of the test program and any arguments it requires.
my ($filename, @args) = @{ $perl->source };
$perl->source( [ $filename, @args ] );
"croak"s if $filename could not be found.
"switches"
my $switches = $perl->switches;
my @switches = $perl->switches;
$perl->switches( @switches );
Getter/setter for the additional switches to pass to the perl executable. One common switch would be to set an include directory:
$perl->switches( ['-Ilib'] );
"get_stream"
my $stream = $source->get_stream($parser);
Returns a stream of the output generated by executing "source". Must be passed an object that implements a "make_iterator" method.
Typically this is a TAP::Parser instance.
"shebang"
Get the shebang line for a script file.
my $shebang = TAP::Parser::Source::Perl->shebang( $some_script );
May be called as a class method
"get_taint"
Decode any taint switches from a Perl shebang line.
# $taint will be 't'
my $taint = TAP::Parser::Source::Perl->get_taint( '#!/usr/bin/perl -t' );
# $untaint will be undefined
my $untaint = TAP::Parser::Source::Perl->get_taint( '#!/usr/bin/perl' );
SUBCLASSING
Please see "SUBCLASSING" in TAP::Parser for a subclassing overview.
Example
package MyPerlSource;
use strict;
use vars '@ISA';
use Carp qw( croak );
use TAP::Parser::Source::Perl;
@ISA = qw( TAP::Parser::Source::Perl );
sub source {
my ($self, $args) = @_;
if ($args) {
$self->{file} = $args->[0];
return $self->SUPER::source($args);
}
return $self->SUPER::source;
}
# use the version of perl from the shebang line in the test file
sub _get_perl {
my $self = shift;
if (my $shebang = $self->shebang( $self->{file} )) {
$shebang =~ /^#!(.*perl.*?)(?:(?:s)|(?:$))/;
return $1 if $1;
}
return $self->SUPER::_get_perl(@_);
}
SEE ALSO
TAP::Object, TAP::Parser, TAP::Parser::Source,
perl v5.12.1 2010-04-26 TAP::Parser::Source::Perl(3pm)
