Search Results

In perl,


#!/usr/bin/perl
use Data::Dumper;

my %Hash = () ;
my ($fh , $mon , $name );
open $fh ,"<file" or die "Can not open the file : $@";

while ( <$fh> ) {
($mon , $name ) =...

.[0-9][0-9] matching the file AB940Insert.xml.

Explain your question clearly.

Try this,


var="25x24";
first=`echo $var | cut -d 'x' -f 1`
second=`echo $var | cut -d 'x' -f 2`
let result=$first*$second;
echo $result;

Try this ,


while read line
do
if [[ $line == *\/data\/* ]]
then
echo `sed -r "s/\/data\//\/newdata\//g" <<<$line`
elif [[ $line == *\/newdata\/* ]]...

Try this shell script ,


#!/bin/bash
while read line1
do
match=0
while read line2
do
if [ $line1 == $line2 ]; then
match=1...

date -d '10 hours'

Check the permission of the script . The script should have executable permission.

Hi all,
Normally to launch a process in the remote machine I will use ssh to the machine and launch the process.I want to launch the remote machine process with out login into the machine...

can you give the sample output .

I need a perl substitution to remove only the comment in the line . That line may have '#' with in double quotes .I used the following ,


s/(^.*\".+?#.+?\".+?)(#.*)/$1/g


It works for ,

...

I am using ubuntu and I used to mount the remote machine directory using the menu 'Places -> Connect to Server' . And I will use SSH as service type.

Usually the mounted files will available in...

After adding this in .vimrc it's working . thanks

I am using vim version 7.1.314.It don't have syn on.Is there any plug in available for syn on or I have to update the version.

Try this ,


my $current = time;
my $sevendays = $current - (7*24*60*60);

I know Data:: Dumper.I asked the way for traversing .

No . The array reference may contain some array references and those references may contain some and so on .So I need to traverse the all the levels and print the data.

Try this,


mark=0;
sentence="Replace the text"

while read line
do
if [ "$line" == "<file1>" ] ;then
echo $line
mark=1;
elif [ "$line" ==...

I have a array reference which has some number of array references inside it.The nested array references also contains the array references.


my $Filename = "sample.xml";

my $Parser = new...

Use the {} to match the number of character occurence before the pattern ,


sed -r "s/^.{15}RAJESH/REPLACE/g"

Actually there is no need for the inner double quote .


system("wget http://ip/sw?s=1");

Try this ,


str3=$(echo "$str1 \n $str2")
echo -e $str3

Perl solution ,


use strict;
use warnings;

open FILE,"<file";

foreach ( <FILE> ) {
if ( /^seqno/i ) {
print $_ ;
next ;
}
if ( /^[0-9].+"$/ ) {
...

use '\b' to match the end of the number ,


[0-9]+0\b

Is this the code you are trying ,


#!/usr/bin/perl

use strict;
use warnings;

my $start = "14:23";
my $end = "14:30";
my $ind = 0;
my @arr;
my $result = 0;
open FILE,"<file";
while (...