Divine Power

  • 홈
  • 태그
  • 미디어로그
  • 위치로그
  • 방명록

AVERAGE 1

Perl one liner와 awk로 평균내기

!/bin/bash cat xxxxx | perl -lane 'print $1 if /[0-9]+m(.+)s/' \ | awk '{print $1; sum+=$1} END { print "Avg = ",sum/NR }' echo end awk 자체에 필터 기능이 어느정도 있는 것으로 알고 있으나 perl을 주력으로 하는 나로서는 perl을 한번 거쳐서 원하는 숫자만 나오게 한 다음 그것을 awk로 평균내는 방향이 쉬운 것 같다.perl에 -lane을 붙이면 grep처럼 쓸 수 있는데... 알다시피 perl의 regular expression에서 match되는것은 숫자 변수가 붙으니까... 그래서, 결국엔 regexp에 맞춰서 match가 일어나면 print를 적절히 해주는 one liner가 된다. 아...

Unix/*Nix계통 팁 2013.08.31
이전
1
다음
더보기
프로필사진

Divine Power

언리미티드 빠와!

  • 분류 전체보기 (1145)
    • thoughts (33)
    • 이것저것 (51)
    • LaTeX (67)
    • cygwin (7)
    • Mac (2)
    • Unix (729)
      • Arch Linux (62)
      • openSUSE (14)
      • CentOS (27)
      • Fedora Core 4 (101)
      • *Nix계통 팁 (65)
      • Gentoo (14)
      • Ubuntu (112)
      • Solaris10 (98)
      • coLinux (13)
      • 유닉스와 디렉토리 (34)
      • Open Solaris (16)
      • Debian (12)
    • 윈도우 (127)
      • 윈도우 '잘'쓰기 (77)
      • Windows Server (3)
      • 비스타 (6)
      • MFC (2)
    • Data science (2)
    • 서버관리 삽질 기록 (23)
    • 링크 (13)
    • 하드웨어 (11)
    • parkoz tips (7)
    • collect (67)

Tag

pidgin-nateon, VIM, FedoraCore, 설치, 하드웨어, Python, latex, Scrap, ubuntu, opensuse, 팁, Linux, 우분투, arch linux, 리눅스, Gentoo, Windows, Solaris, tikz, archlinux,

최근글과 인기글

  • 최근글
  • 인기글

최근댓글

공지사항

  • SOHEE 서버 관계도
  • 첨부파일에 대해

페이스북 트위터 플러그인

  • Facebook
  • Twitter

Archives

Calendar

«   2025/05   »
일 월 화 수 목 금 토
1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 31

방문자수Total

  • Today :
  • Yesterday :

Copyright © Kakao Corp. All rights reserved.

티스토리툴바