Sponsored Content
Full Discussion: perl - replace value
Top Forums Shell Programming and Scripting perl - replace value Post 302533413 by bartus11 on Thursday 23rd of June 2011 02:47:41 PM
Old 06-23-2011
Weird. It is working for me on the sample that you provided:
Code:
[root@linux ~]# cat file
[Global]
$$ID=<0>
$$Country=<Country>
[root@linux ~]# perl -psi -e 's/\$\$ID=<.*>/\$\$ID=<$val>/' -- -val=33 file
[root@linux ~]# cat file
[Global]
$$ID=<33>
$$Country=<Country>

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Replace Perl Module name in all Perl scripts

I want to replace a Perl module name in all my Perl Scripts in the cgi-bin directory. How is it possible? I have the following statement in my scripts use myUtil; I want to change it to use myUtil777; Regards, Rahul (2 Replies)
Discussion started by: rahulrathod
2 Replies

2. Shell Programming and Scripting

Search and replace in Perl

Hello, I have a Perl script that reads in an Excel spread sheet and formats the values into a text file. I am having trouble with one column that can have numbers or letters. Excel left justifies the values that start with a letter and right justifies the values that contain only a... (2 Replies)
Discussion started by: jyoung
2 Replies

3. Shell Programming and Scripting

How to replace string in perl?

Hi, I have string like this: $query="#1,apple"; $string=$query; I want to replace #1 with fruit. I tried like this: string=~s/#\d+/$query/ig; print "\n string: $string\n"; It is working only when there is single #1 or #2 but when i give like #1,#2,#3,apple the above code... (2 Replies)
Discussion started by: vanitham
2 Replies

4. Shell Programming and Scripting

How to replace a value in a file in perl?

Hi, I have a file with the following contents and i want to replace that value in a file with some other value. #file.txt /local/Disk/data n 192.168.55.98 52035 3 1 2 1 1 192.168.55.98 Here is my code. (2 Replies)
Discussion started by: vanitham
2 Replies

5. Shell Programming and Scripting

Search and Replace in Perl

I am trying to write a simple perl script to run on a FreeBSD machine. There are alot of posts here, and I have read so many, yet can not get this script to run. #!/usr/bin/perl -e 's/\r\n/~/' infile.txt outfile.txt I am trying to take a windows text file, move it into Unix, run a script on... (1 Reply)
Discussion started by: mach1
1 Replies

6. Shell Programming and Scripting

how to replace a particular character in perl

Hi, I have a file with two string : aa_bb_cc_def gg_hh_jj_xyz now i want a command in perl script, which gives me the result as : aa_bb_cc.def gg_hh_jj.xyz Can anyone help me on this plz.. thanks in advane. (6 Replies)
Discussion started by: arup1980
6 Replies

7. Shell Programming and Scripting

How replace -- character in perl

Hi All, I am having below issue could anybody help me. $x= SELECT * FROM EMP --xyz this change is done in q2; I want delete the charchters from -- to till the end. I want $x to be $x= SELECT * FROM EMP; Thanks, Vijay G (1 Reply)
Discussion started by: gvk25
1 Replies

8. Shell Programming and Scripting

Replace [|] in perl

Hi I have a file newfile.txt in perl. Its content is 2253397806-Dec-11 03.04.14.000000 PM9999901-May-12 03.28.21.000000 PM222212{|} 2905597803-Jan-12 01.24.24.000000 AMBank_CreateCustomerDET01-May-12 11.14.53.000000 AM232382{|} I have to replace by | and {|} by... (5 Replies)
Discussion started by: irudayaraj
5 Replies

9. Shell Programming and Scripting

Perl value lookup and replace

Hi, I have an input file and a config file which I need to lookup values in using Perl: Input file: ID, Value COMP0,0 COMP1,1 COMP2,2 COMP3,3 COMP4,3 COMP5,5Config file: ID, Operation COMP0,((@COMP1@ + @COMP2@ + @COMP3@) / @COMP4@) + @COMP5@Expected output: ID, Value COMP0,7 # This... (0 Replies)
Discussion started by: Subbeh
0 Replies

10. Shell Programming and Scripting

Search and replace (perl)

How can I achieve this? Perl would be awesome. Input string a_b c //Note there is a blank here Needed Output a_b_c Thanks (4 Replies)
Discussion started by: dragonpoint
4 Replies
Mixin::ExtraFields::Param(3pm)				User Contributed Perl Documentation			    Mixin::ExtraFields::Param(3pm)

NAME
Mixin::ExtraFields::Param - make your class provide a familiar "param" method VERSION
version 0.011 $Id: /my/cs/projects/Mixin-ExtraFields-Param/trunk/lib/Mixin/ExtraFields/Param.pm 29059 2006-12-11T03:20:29.045283Z rjbs $ SYNOPSIS
package Widget::Parametric; use Mixin::ExtraFields::Param -fields => { driver => 'HashGuts' };; ... my $widget = Widget::Parametric->new({ flavor => 'vanilla' }); printf "%s: %s ", $_, $widget->param($_) for $widget->param; DESCRIPTION
This module mixes in to your class to provide a "param" method like the ones provided by CGI, CGI::Application, and other classes. It uses Mixin::ExtraFields, which means it can use any Mixin::ExtraFields driver to store your data. By default, the methods provided are: o param o exists_param o delete_param These methods are imported by the "fields" group, which must be requested. If a "moniker" argument is supplied, the moniker is used instead of "param". For more information, see Mixin::ExtraFields. METHODS
param my @params = $object->param; # get names of existing params my $value = $object->param('name'); # get value of a param my $value = $object->param(name => $value); # set a param's value my @values = $object->param(n1 => $v1, n2 => $v2, ...); # set many values This method sets or retrieves parameters. AUTHOR
Ricardo SIGNES, "<rjbs@cpan.org>" BUGS
Please report any bugs or feature requests to <http://rt.cpan.org>, for Mixin-ExtraFields-Param. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. COPYRIGHT
Copyright 2005-2006 Ricardo Signes, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. perl v5.10.1 2006-12-11 Mixin::ExtraFields::Param(3pm)
All times are GMT -4. The time now is 10:33 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy