Perl substr or similar help Post: 303025188

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

How to declare hashes in KSH similar to Perl ?

Hi, Is it possible to delcare hashes in KSH the way we do it in Perl. Like I want to declare something like: fruits="Juicy" fruits="healthy" fruits="sour" echo fruits Ofcourse this piece of code does not work in KSH. Please let me know if there is a way of doing it in KSH. ...

2. Shell Programming and Scripting

copy substr in existing string in Perl

Any clue to write something to a particular location in Perl? Suppose $line = �abc cde 1234� How to write ( example string "test") on location 4 without parsing the whole line. Output should be $line = �abctest 1234� this is not search and replace. just to add substring into...

3. UNIX for Dummies Questions & Answers

substr in perl

Let's assume that I have a file with contents delimited by pipe: "The mouse|ran up|the|clock" "May|had a|little|lamb" How would I use 'substr' to get the 3rd field. For example, "the" from the first line, and "little" from the second line? # Loop over a file and read $LINE { ...

4. UNIX for Dummies Questions & Answers

substr function in perl

Hi friends, I have written a perl code and it works fine but I am not sure tommorow it works or not, please help me. problem : When diff is 1 then success other than its failure but tomorrow its 20090401 and the enddate is 20090331. thats why I write the code this type but it does not work and...

5. Shell Programming and Scripting

20090620231013 to date format i am using substr, any simple way in perl?

Hi Everyone, $tmp="20090620231013"; $tmp = substr($tmp,0,8)." ".substr($tmp,8,2).":".substr($tmp,10,2).":".substr($tmp,12,2); So my output is: 20090620 23:10:13. I only can think substr is easy, any perl can do this just one line very simple efficient one? :eek: Thanks

6. Shell Programming and Scripting

perl file, one line code include "length, rindex, substr", slow

Hi Everyone, # cat a.txt a;b;c;64O a;b;c;d;ee;f # cat a.pl #!/usr/bin/perl use strict; use warnings; my $tmp3 = ",,a,,b,,c,,d,,e,,f,,"; open(my $FA, "a.txt") or die "$!"; while(<$FA>) { chomp; my @tmp=split(/\;/, $_); if ( ($tmp =~ m/^(64O)/i) || ($tmp...

7. Shell Programming and Scripting

Joining multiple files based on one column with different and similar values (shell or perl)

Hi, I have nine files looking similar to file1 & file2 below. File1: 1 ABCA1 1 ABCC8 1 ABR:N 1 ACACB 1 ACAP2 1 ACOT1 1 ACSBG 1 ACTR1 1 ACTRT 1 ADAMT 1 AEN:N 1 AKAP1File2: 1 A4GAL 1 ACTBL 1 ACTL7

8. Shell Programming and Scripting

Perl match multiple numbers from a variable similar to egrep

I want to match the number exactly from the variable which has multiple numbers seperated by pipe symbol similar to search in egrep.below is the code which i tried #!/usr/bin/perl my $searchnum = $ARGV; my $num = "148|1|0|256"; print $num; if ($searchnum =~ /$num/) { print "found"; }...

9. Shell Programming and Scripting

How to use if/else if with substr?

I have a command like this: listdb ID923 -l |gawk '{if (substr($0,37,1)==1 && NR == 3)print "YES" else if (substr ($0,37,1)==0 && NR == 3) print "NO"}' This syntax doesn't work. But I was able to get this to work: listdb ID923 -l |gawk '{if (substr($0,37,1)==1 && NR == 3)print "YES"}' ...

10. UNIX for Dummies Questions & Answers

Substr

awk '/^>/{id=$0;next}length>=7 { print id, "\n"$0}' Test.txt Can I use substr to achieve the same task? Thanks!

LEARN ABOUT DEBIAN

se_synaptic

SE_DPKG(8)								NSA								SE_DPKG(8)

NAME

       se_dpkg,se_apt-get,se_aptitude,se_dpkg-reconfigure,se_dselect,se_synaptic  -  run  a  Debian package system programs in the proper security
       context

SYNOPSIS

       se_dpkg [  <<dpkg ARGS>> ... ]
       se_apt-get [ <<apt-get ARGS>> ... ]
       se_aptitude [ <<aptitude ARGS>> ... ]
       se_dpkg-reconfigure [ <<dpkg-reconfigure ARGS>> ... ]
       se_dselect [ <<dselect ARGS>> ... ]
       se_synaptic [ <<synaptic ARGS>> ... ]

DESCRIPTION

       These programs are all symbolic links to a simple wrapper script that uses run_init to run actually run	the  corresponding  program  after
       setting up the proper context.  run_init acquires a new Psuedo terminal, forks a child process that binds to the pseudo terminal, forks the
       program (dpkg,apt-get,aptitude,synaptic,dselect,ordpkg-reconfigure) that the user actually needs to run, and then sits around and  connects
       the  physical  terminal it was invoked upon with the psuedo terminal, passing keyboard into to the child process, and passing the output of
       the child process to the physical terminal.

       It sets up the psuedo terminal properly based on the physical terminal attributes, and then sets the user's terminal to	RAW  mode,  taking
       care to reset it on exit.

AUTHOR

       This manual page was written by Manoj Srivastava <srivasta@debian.org>, for the Debian GNU/Linux system.

Security Enhanced Linux 					   January 2008 							SE_DPKG(8)