Search Results

I have read many tutorials and cannot get this to work. I need to use pcre (because that is what the library in the software we are using uses) and pcregrep everything except /home from the...

I need help with the following code. It does what i want it to, but since I clear the screen and do not update it when i finally ^C my scroll back buffer is filled with garbage. Term::Cap might not...

I currently have a statistics gathering script i run on my Linux servers. One of the stat i gather is total memory in the machine. The script is all perl with the exception of gathering the memory...

Sweet, the following code worked:

if (($model eq "N\\A\n") && ($kernel =~ m/xen/)) {
$model = "Virtual Machine\n";
}

Had to add the \n on the "N\\A" variable because that is how it is...

I have having problems with an IF statement in my perl script:

if ($model eq "N\\A") {}
elsif ($kernel =~ m/xen/) {
$model = ("Virtual Machine\n")};


What i am trying to accomplish is...

I have the following script to edit ^'s and newlines out of files to be entered into a database. This script has been around since the dawn of time (way before me).

#!/bin/bash

# Remove all ^...

I have a text file and every line ends in


|^
|^^
|^^^
|^^^^


I need to use sed to make all lines end it

|^

regardless of the amount of carrots.

The code i was using is:

cat...

This returns me the actual model of the machine. In this case

ProLiant BL25p G1

Which is what management wants. I was just curious if there was a perl way to do the grep and awk (I know i...

I have a script to get server information i wrote in perl because i would like to learn it (and I use it for work). It works great, however i would like to know if there is a good way to reduce the...

I need to write a script to move files only when they are not in use. I have a rudementry bash script for Linux but i need a perl script so it will work on Linux and hpux. Oracle writes files to a...

I have a perl script that just does a `du -sk -x` and formats it to look groovy ( the argument can be a directory but usually is like /usr/local/* )

#!/usr/bin/perl

use strict;
use warnings;
...

I have a perl function in my script that needs to replace an entire line in a file

sub changestate {
my $base = ();
my @base = ();

open(BASE, $file) || die("Could not open file!");
...

5 years old and this post is still helpful, thank you unix.com.

The paste command worked great and did just what I was looking for. I appreciate the help.

Sean

I have a list of servers in a file called serverlist like this

server1
server2
server3

i need to have them (with no trailing comma, the program does not like that)

server1,server2,server3...

I have a bit of javascript


function hasSpaces(name)
{
if(name.search(/^\s*/) != -1){
alert(name);
name.replace((/^\s*/,...

That command worked great, i have never used the uniq command before but it was just what i was looking for thank you.

I have a file that contains

/home
/opt
/stand
/var
/usr
/tmp
/opt
/home

I need to print the lines that are unique so the output would be

/stand
/var
/usr
/tmp

and omit any...

That worked great thank you

I need to have my scripts import volume groups and mknod devices files. I have most of the script working but the device file needs to be in the format 0x??0000 (where the question marks are my HEX...

that worked perfectly thank you

I need to grep out usernames with UID's greater than 200 out of the /etc/passwd file for a server migration. It is the third field however I am not sure to to accomplish this. I tried to search the...

I have the command

cat - << _EOF | ed /home/fred/test >/dev/null 2>&1
2 s#u_pwd=[^:]*:#u_pwd=${Password}:#
3,$ s/u_succhg#[^:]*:/u_succhg#${Date}:/
w
q...

Sweet all of them work great. I went with aigles's code because it was the shortest but now I need to look into python. Thanks a lot guys.

Hey guys i need to take the MAC address in the format of

0x00255T08D433

and convert it to

00:25:5T:08:D4:33 (it goes :08: D4:33 with no space the forum is making it a big smiley)

for a...