Yes, it assigns the string 'Stuff' to variable 'Var'.
Wether 'Var' contains a string "Stuff" or the filename (also a string) "Stuff" is no diffrence at all.
It neither points to the file, nor does it contain the file's data, it just contains the name of the file... 'Stuff.
To access the file, you'll need to work with that variable obviously...
Like:
In this case, cat is used to display the file's content.
However, as soon the file is located in another place, you must use either relative or absolute path location.
Eg:
Both lines refer to the same location, if script is in $HOME/bin and the file in $HOME only.
Hello Everybody,
Does anyone know what the @ symbol means in a csh script, if used with a variable assignment as below
@ line = 1
why not just use....
set line=1
Many thanks
rkap (1 Reply)
Hello,
I would like to assign number of lines in a file to a variable (to be passed later as an argument to a function). I am doing it like this:
numLines=wc -l < file.txt
which gives an error. Could somebody help? (2 Replies)
Hi, I've been running code which very frequently calls books.csv. e.g:
grep -i horror books.csv > tempExcept, I'm trying to move away from using temporary files or frequently calling books.csv to improve efficiency. So I tried something like
bookfile=$(cat books.csv)
grep -i horror... (4 Replies)
Hey,
So I've run into a problem, due to my limited knowledge of Bash scripting.
Basically I've got a long script and I want to understand it before I even try and edit it. As long as I don't understand the script, I will not bother editing it.
Anyway, the following variable confuses me... (5 Replies)
Hi guys,
I'm basically looking for some help with a bash script I've written. It's purpose is to assign process to individual CPU cores once that process hits 15% CPU usage or more. If it drops below 15%, it's unassigned again (using taskset).
My problem is that I can't think of a way to... (2 Replies)
Hi,
In AIX I have a variable with , (coma) separated values assigned to it like shown below
var1=apple,boy,chris
i want to convert this to
var1='apple','boy','chris'
the number of values assigned to var1 might change and it could be from 1 to n
any suggestions please? (3 Replies)
while i've used arrays to work with variables, i've never used them to loop through a set of strings and wanted to ask the community for some feedback or assistance.
let me be specific. here's my code:
# URL port Variables
port2195=`nc -z $url2195 2195`
port2196=`nc -z $url2196 2196`... (5 Replies)
Hi
I have a strange problem:
In my shell script I am performing a copy task:
. prop.txt
cp -r $dir/ $dir/archive
$dir is fetched from a property file (prop.txt) which stores its value
dir=/opt/data
Now the problem is another dir1 comes into picture. I only want to add... (1 Reply)
Hi
I am facing a problem.
export local_folder=/opt/app/
cd /opt/app/abc/
abcversion="abc*" (abcga5 is inside /opt/app/abc/)
echo $abcversion (it echoes the correct version as abcga5 )
Now when I reuse the value of abcversion for a below path:
export... (6 Replies)
I have a little code block (executing on AIX 7.1) that I cannot understand why the NOTFREE=0 does not appear to be assigned even though it goes through that block. This causes a unary operator issue.
#!/bin/bash
PLATFORM="AIX"
NEEDSPC=3000
set -x
if ; then
lsvg | grep -v rootvg | while... (6 Replies)
Discussion started by: port43
6 Replies
LEARN ABOUT DEBIAN
class::data::inheritable
Class::Data::Inheritable(3pm) User Contributed Perl Documentation Class::Data::Inheritable(3pm)NAME
Class::Data::Inheritable - Inheritable, overridable class data
SYNOPSIS
package Stuff;
use base qw(Class::Data::Inheritable);
# Set up DataFile as inheritable class data.
Stuff->mk_classdata('DataFile');
# Declare the location of the data file for this class.
Stuff->DataFile('/etc/stuff/data');
# Or, all in one shot:
Stuff->mk_classdata(DataFile => '/etc/stuff/data');
DESCRIPTION
Class::Data::Inheritable is for creating accessor/mutators to class data. That is, if you want to store something about your class as a
whole (instead of about a single object). This data is then inherited by your subclasses and can be overriden.
For example:
Pere::Ubu->mk_classdata('Suitcase');
will generate the method Suitcase() in the class Pere::Ubu.
This new method can be used to get and set a piece of class data.
Pere::Ubu->Suitcase('Red');
$suitcase = Pere::Ubu->Suitcase;
The interesting part happens when a class inherits from Pere::Ubu:
package Raygun;
use base qw(Pere::Ubu);
# Raygun's suitcase is Red.
$suitcase = Raygun->Suitcase;
Raygun inherits its Suitcase class data from Pere::Ubu.
Inheritance of class data works analogous to method inheritance. As long as Raygun does not "override" its inherited class data (by using
Suitcase() to set a new value) it will continue to use whatever is set in Pere::Ubu and inherit further changes:
# Both Raygun's and Pere::Ubu's suitcases are now Blue
Pere::Ubu->Suitcase('Blue');
However, should Raygun decide to set its own Suitcase() it has now "overridden" Pere::Ubu and is on its own, just like if it had overriden
a method:
# Raygun has an orange suitcase, Pere::Ubu's is still Blue.
Raygun->Suitcase('Orange');
Now that Raygun has overridden Pere::Ubu futher changes by Pere::Ubu no longer effect Raygun.
# Raygun still has an orange suitcase, but Pere::Ubu is using Samsonite.
Pere::Ubu->Suitcase('Samsonite');
Methods
mk_classdata
Class->mk_classdata($data_accessor_name);
Class->mk_classdata($data_accessor_name => $value);
This is a class method used to declare new class data accessors. A new accessor will be created in the Class using the name from
$data_accessor_name, and optionally initially setting it to the given value.
To facilitate overriding, mk_classdata creates an alias to the accessor, _field_accessor(). So Suitcase() would have an alias _Suit-
case_accessor() that does the exact same thing as Suitcase(). This is useful if you want to alter the behavior of a single accessor yet
still get the benefits of inheritable class data. For example.
sub Suitcase {
my($self) = shift;
warn "Fashion tragedy" if @_ and $_[0] eq 'Plaid';
$self->_Suitcase_accessor(@_);
}
AUTHOR
Original code by Damian Conway.
Maintained by Michael G Schwern until September 2005.
Now maintained by Tony Bowden.
BUGS and QUERIES
Please direct all correspondence regarding this module to:
bug-Class-Data-Inheritable@rt.cpan.org
COPYRIGHT and LICENSE
Copyright (c) 2000-2005, Damian Conway and Michael G Schwern. All Rights Reserved.
This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.
SEE ALSO
perltooc has a very elaborate discussion of class data in Perl.
perl v5.8.8 2008-01-25 Class::Data::Inheritable(3pm)