How can I grep for a certain letter that only shows on the 3rd letter or character.
ex:
ASGHDY
SHTYRD
SDTYRD
IGIKGD
I only want the TY part of the 3rd character
so output would only be SHTYRD and DDTYRD - I only want the TY on the 3rd character.
THANKS (5 Replies)
Hi
I would like to accept in a string from user like
username/pwd@dbname
suppose the user does not input @ then i should throw an error that @ symbol missing . How to achieve this
Thanks in advance
Suresh (6 Replies)
hello,
How to parse a file to see if a specific line is commented by '#' character?
filename: file1
cat file1
...
# /usr/bin/whatever
...
thank you (9 Replies)
Hi,
For example, i have a string
"123 456 789 abc 111 222 333"
and I would like to delete all the characters before abc so that it becomes
"abc 111 222 333"
how can i do that in unix? using sed?
note: I actually don't know how many words/charachters before "abc", so the "cut"... (9 Replies)
Friends, I'm looking for a command that delete the first tho caractere in a word. Here is an exp :
I want to replace "20091001" by "091001"
or "replace" by "place"
Thx, (13 Replies)
Hi all,
I have a file with some module names as below.
Font::AFM
Data::Grove ---> libxml-perl
Net::LDAP ---> perl-ldap
DBI
XML
....
...
....
and so on ...
The file has some lines with the character " -->" .
Now how can I cut only the last column of the line wherever "-->" is... (4 Replies)
Hi Expert,
I would like to know on how to export only the first 6 character of below
0050569868B7
ABCDEFGHTY
to
005056
ABCDEF
Thank you.
Reggy (7 Replies)
Hi friends,
I am working in a korn shell. i want to know the command which gives me the previous one character and next one character of a given keyword in a string?
for exmaple:
input string: /bin/dir/folder1/.proc_name^folderone
Keyword: proc_name
output : .^
... (10 Replies)
How can I represent the position of 1 (considering only the 1s after the colon) in the word from field5 and above; counting from right to left.
Input:
TT-124 06-03-14 08-02-10 FAS CAT1:10
TT-125-1 05-03-14 10-06-08 CAS CAT2:1010 FAT1:10000
TT-125-3 07-03-14 11-02-06 FAS FAT1:1101... (6 Replies)
Hi,
I have a file which looks like this
id integer,
name string,
create_dt date,
I want to remove all words that are present before the character ,
My output should be
id,
name,
create_dt,
Thanks
wah (2 Replies)
Discussion started by: wahi80
2 Replies
LEARN ABOUT DEBIAN
template::alloy::compile
Template::Alloy::Compile(3pm) User Contributed Perl Documentation Template::Alloy::Compile(3pm)NAME
Template::Alloy::Compile - Compile role - allows for compiling the AST to perl code
DESCRIPTION
The Template::Alloy::Compile role allows for taking the AST returned by the Parse role, and translating it into a perl code document. This
is in contrast Template::Alloy::Play which executes the AST directly.
TODO
o Translate compile_RAWPERL to actually output rather than calling play_RAWPERL.
ROLE METHODS
"compile_tree"
Takes an AST returned by parse_tree and translates it into perl code using functions stored in the $DIRECTIVES hashref.
A template that looked like the following:
Foo
[% GET foo %]
[% GET bar %]
Bar
would parse to the following perl code:
# Generated by Template::Alloy::Compile v1.001 on Thu Jun 7 12:58:33 2007
# From file /home/paul/bar.tt
my $blocks = {};
my $meta = {};
my $code = sub {
my ($self, $out_ref, $var) = @_;
$$out_ref .= 'Foo';
# "GET" Line 2 char 2 (chars 6 to 15)
$var = $self->play_expr(['foo', 0]);
$$out_ref .= defined($var) ? $var : $self->undefined_get(['foo', 0]);
# "GET" Line 3 char 2 (chars 22 to 31)
$var = $self->play_expr(['bar', 0]);
$$out_ref .= defined($var) ? $var : $self->undefined_get(['bar', 0]);
$$out_ref .= 'Bar';
return 1;
};
{
blocks => $blocks,
meta => $meta,
code => $code,
};
As you can see the output is quite a bit more complex than the AST, but under mod_perl conditions, the perl will run faster than
playing the AST each time.
"compile_expr"
Takes an AST variable or expression and returns perl code that can lookup the variable.
AUTHOR
Paul Seamons <paul at seamons dot com>
LICENSE
This module may be distributed under the same terms as Perl itself.
perl v5.10.1 2008-09-17 Template::Alloy::Compile(3pm)