01-16-2007
Quote:
Originally Posted by radoulov
With bash:
$ cat file.txt
pete
lisa
john
$ var=$(<file.txt) && var=${var//'
'/-} && echo $var
pete-lisa-john
Regards
Dimitre
It works with ksh too. Great work.
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
why i can't use this command:
echo $arg | cut -c 1,2 | read remainArg or
echo $arg | cut -c 1,2 | read $remainArg
so that the result will be assign to remainArg.
Anyway to do this? :) (1 Reply)
Discussion started by: AkumaTay
1 Replies
2. Shell Programming and Scripting
I have to assign a result of a query to a vairable like this
how can i do this
Query = select count(*) from table
x=`db2 ${Query}| sed -n '4p'`
but this doesn't work, is there any other way to assign the result without redirecting the result to temp file. .
Thanks
Mark. (3 Replies)
Discussion started by: markjason
3 Replies
3. Shell Programming and Scripting
Hi Experts,
I am facing some problem while developing the script.My input config.csv file contains the three columns namely pathname,filename,filetype.Based on the file type i have to use ftp command that is if filetype=csv then do ftp.
The input file is
cat config.csv... (13 Replies)
Discussion started by: Amey Joshi
13 Replies
4. Shell Programming and Scripting
bash-3.00$ /usr/bin/netstat -an -f inet | awk -F' ' '{if ($1$4 == "tcp*.21")print $5}'
*.*
bash-3.00$ A=` /usr/bin/netstat -an -f inet | awk -F' ' '{if ($1$4 == "tcp*.21")print $5}'`
bash-3.00$ echo $A
db2_lastdone.bkp
As you can see ,after running command i get *.* in return but the same... (5 Replies)
Discussion started by: ak835
5 Replies
5. Shell Programming and Scripting
Dear All,
we have a command output which looks like :
Total 200 queues in 30000 Kbytes
and we're going to get "200" and "30000" for further process. currently, i'm using :
numA=echo $OUTPUT | awk '{print $2}'
numB=echo $OUTPUT | awk '{print $5}'
my question is : can I use just one... (4 Replies)
Discussion started by: tiger2000
4 Replies
6. Shell Programming and Scripting
How can I assign a variable to an variable. IE $car=honda
One way I can do it is export $car=honda
or
let $car=2323
Is there any other ways to preform this task (3 Replies)
Discussion started by: 3junior
3 Replies
7. Shell Programming and Scripting
I launch 'netstat -a', if string 'ESTABLISHED' found, then VAR=1
#!/bin/bash
VAR=0;
netstat -a | awk '$6 ~ /ESTABLISHED/ {VAR=1}'
I cannot find the right syntax.
thanx guys! (3 Replies)
Discussion started by: arpagon
3 Replies
8. UNIX for Beginners Questions & Answers
Hello All,
Hope you're doing well !
I am trying below command to be passed in a shell script, header_date_14 is a variable and $1 is the name of a file I intend to pass as a command line argument, however command line argument is not being accepted.
header_date_14=$(m_dump... (8 Replies)
Discussion started by: ektubbe
8 Replies
9. UNIX for Beginners Questions & Answers
I have the following script, and I want to assign the output ($10 and $5) from awk to N and L:
grdinfo data.grd | awk '{print $10,$5}'| read N L
output from gridinfo data.grd is: data.grd 50 100 41 82 -2796 6944 0.016 0.016 3001 2461. where N and L is suppose to be 3001 and 100. I use... (8 Replies)
Discussion started by: geomarine
8 Replies
10. UNIX for Beginners Questions & Answers
Hi Guys,
I need to assign the value of which has rows to a variable, Can you advise how to do that
hive --orcfiledump /hdfs_path/ | grep "Rows"
Rows: 131554
I need to assign this row count itself to a unix variable
count=$(hive --orcfiledump /hdfs_path/ | grep "Rows")
Expected ... (6 Replies)
Discussion started by: Master_Mind
6 Replies
LEARN ABOUT OSX
moose::cookbook::roles::applicationtoinstance
Moose::Cookbook::Roles::ApplicationToInstance(3) User Contributed Perl Documentation Moose::Cookbook::Roles::ApplicationToInstance(3)
NAME
Moose::Cookbook::Roles::ApplicationToInstance - Applying a role to an object instance
VERSION
version 2.0604
SYNOPSIS
package MyApp::Role::Job::Manager;
use List::Util qw( first );
use Moose::Role;
has 'employees' => (
is => 'rw',
isa => 'ArrayRef[Employee]',
);
sub assign_work {
my $self = shift;
my $work = shift;
my $employee = first { !$_->has_work } @{ $self->employees };
die 'All my employees have work to do!' unless $employee;
$employee->work($work);
}
package main;
my $lisa = Employee->new( name => 'Lisa' );
MyApp::Role::Job::Manager->meta->apply($lisa);
my $homer = Employee->new( name => 'Homer' );
my $bart = Employee->new( name => 'Bart' );
my $marge = Employee->new( name => 'Marge' );
$lisa->employees( [ $homer, $bart, $marge ] );
$lisa->assign_work('mow the lawn');
DESCRIPTION
In this recipe, we show how a role can be applied to an object. In this specific case, we are giving an employee managerial
responsibilities.
Applying a role to an object is simple. The Moose::Meta::Role object provides an "apply" method. This method will do the right thing when
given an object instance.
MyApp::Role::Job::Manager->meta->apply($lisa);
We could also use the "apply_all_roles" function from Moose::Util.
apply_all_roles( $person, MyApp::Role::Job::Manager->meta );
The main advantage of using "apply_all_roles" is that it can be used to apply more than one role at a time.
We could also pass parameters to the role we're applying:
MyApp::Role::Job::Manager->meta->apply(
$lisa,
-alias => { assign_work => 'get_off_your_lazy_behind' },
);
We saw examples of how method exclusion and alias working in Moose::Cookbook::Roles::Restartable_AdvancedComposition.
CONCLUSION
Applying a role to an object instance is a useful tool for adding behavior to existing objects. In our example, it is effective used to
model a promotion.
It can also be useful as a sort of controlled monkey-patching for existing code, particularly non-Moose code. For example, you could create
a debugging role and apply it to an object at runtime.
AUTHOR
Moose is maintained by the Moose Cabal, along with the help of many contributors. See "CABAL" in Moose and "CONTRIBUTORS" in Moose for
details.
COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Infinity Interactive, Inc..
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
perl v5.16.2 2012-09-19 Moose::Cookbook::Roles::ApplicationToInstance(3)